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32,3T5S 

14,2000 

14,3405 


bank 32 
*TU3C SIAHTAB 

bank 





CttWT 

14/SWHS 



14,3405 

15261 0 

2DBC 

*.8341953207 

B-1 

STAR 37 

14,3405 

14,3407 

27231 1 

74126 1 

2Pec 

-.2394362567 

B-1 

STAB 37 

14.3410 

14.3411 

61161 0 

70032 1 

2DBC 

-.4967780649 

B-1 

STAR 37 

14.3412 

14.3413 

54470 0 

15013 1 

2DGC 

*.8138753897 

B-1 

STAR 36 

14.3414 

14.3415 

10432 0 

67066 0 

2oec 

-.5559063490 

B-1 

STAR 36 

14.3416 

14.3417 

40370 1 

02550 0 

jpec 

*.1690413589 

B-1 

STAR 36 

14.3420 

14.3421 

31133 1 

07207 0 

2pec 

*.4540570017 

B-1 

STAR 35 

14.3422 

14.3423 

24243 1 

67275 0 

2pec 

-.5393383149 

B-1 

STAR 35 

14.3424 

14.3425 

67544 0 

13261 0 

2PBC 

*.7091871552 

B-1 

star 35 

14.3426 

14.3427 

25121 1 

05075 b 

2DGC 

*.3200014224 

B-1 

STAR 34 

14.3430 

14.3431 

1635 0 0 

70715 0 

2DeC 

-.4436740480 

B-1 

STAR 34 

14.3432 

14.3433 

55404 1 

62466 1 

Tpec 

-.8371095679 

B-1 

stab 34 

14.3434 

14.3435 

54577 0 

10650 0 

2pec 

*.5518160037 

B-1 

STAR 33 

14.3436 

14.3437 

17202 1 

63234 1 

ipec 

-.7934422090 

B-1 

STAR 33 

14.3440 

14.3441 

43704 0 

73710 0 


-.2568045150 

B-1 

star 33 

14.3442 

14.3443 

50170 1 

07203 1 

jpec 

*.4535381097 

B-1 

STAR 32 

14.3444 

14.3445 

13612 0 

61746 0 

2PBC 

-.8780537171 

B-1 

STAR 32 

14.3446 

14.3447 

77370 0 

02343 1 

2PBC 

♦ .1527307006 

B-1 

star 32 

14.3450 

14.3451 

05340 0 

03235 0 

2Pec 

*.2067145272 

B-1 

star 31 

14.3452 

14.3453 

14762 1 

62030 0 

■gxc 

-.8720349419 

B-1 

star 31 

14.3454 

14.3455 

51212 1 

70715 0 

2pec 

-.4436486945 

B-1 

STAB 31 

14.3456 

14.3457 

64117 1 

01744 1 

2pec 

*.1216171923 

B-1 

STAR 30 

14,3460 

11157 1 
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05X2 

0522 

0523 

0523 

0524 

0524 

0525 
0525 
0525 
0525 
052T 
052T 
0525 

0528 
0520 

0529 

0530 

0530 

0531 

0531 

0532 

0532 

0533 

0533 

0534 

0534 

0535 
0535 
0535 
0538 

0537 
053T 

0538 

0538 

0539 

0539 

0540 

0540 

0541 

0541 

0542 

0542 

0543 

0543 

0544 

0544 

0545 
0545 
0545 
0548 
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UffilUS PAGE NO. 2 EO S3 




14.3481 

14.3482 

14.3483 

14.3484 

14.3485 
14,3488 
14,3487 

14.3470 

14.3471 

14.3472 

14.3473 

14.3474 

14.3475 
14,3478 
14,3477 

14.3500 

14.3501 

14.3502 

14.3503 

14.3504 

14.3505 
14,3508 
14,3507 

14.3510 

14.3511 

14.3512 

14.3513 

14.3514 

14.3515 

14.3516 

14.3517 

14.3520 

14.3521 

14.3522 

14.3523 

14.3524 

14.3525 
14,3528 
14,3527 

14.3530 

14.3531 

14.3532 

14.3533 

14.3534 

14.3535 

14.3536 

14.3537 

14.3540 

14.3541 

14.3542 


03531 0 
66055 1 
12007 0 
37503 0 
76145 0 
53477 0 
60372 1 
43624 0 
03370 0 
15121 1 
76123 0 
64245 0 
72437 1 
45623 1 
61041 0 
57124 1 
72275 1 
55365 1 
62641 0 
72150 0 
70712 1 
41542 1 
67 36 3 0 
50441 0 
64426 0 
7728 3 0 
07157 0 
34056 0 
63326 0 
77723 1 
67516 1 
72566 1 
05231 1 
14031 0 
64753 1 
63156 0 
71237 1 
42272 0 
66427 0 
64260 1 
68546 0 
73302 1 
73261 0 
73575 1 
14122 0 
07016 1 
61247 1 
42015 0 
72314 1 
87004 1 


Spec 

-.7703014754 B-i S1«R 30 

y 

2DBC 

*.8259751556 B-i SWR 30 

z 

2oec 

-.1128285542 B-i S»R 39 

K 

2Pec 

-.9694679589 B-i STAR 29 

Y 

2DGC 

*.2178238347 B-i STAR 29 

Z 

2DeC 

-.1147908312 B-i STAR 28 

X 

2DGC 

-.3399437395 B-i STAR 28 

y 

2DeC 

-.9334136229 B_i STAR 28 

z 

2DEC 

-.3518772846 B-i STAR 27 

X 

2DGC 

-.8239967165 B-i STAR 27 

Y 

2PBC 

-.4440853383 B-i STAR 27 

Z 

2PBC 

-.5328042377 B-i STAR 28 

X 

2pec 

-.7159448596 B-i STAR 26 

y 

2Pec 

*.4511569595 B-i STAR 26 

z 

2D0C 

-.786255 2143 B-i STAR 25 

X 

2DBC 

-.5216265404 B-i STAR 25 

y 

2DBC 

*.3312227199 B-i STAR 25 

z 

2Dec 

-.6899901699 B-l STAR 24 

X 

2DBC 

-.4180817959 B-i SIAR 24 

y 

2DBC 

-.5908647707 B-i STAR 24 

z 

2DBC 

-.5811943804 B-i STAR 23 

X 

2DBC 

-.2907877154 B-i STAR 23 

y 

2DBC 

*.7600365758 B-i STAR 23 

z 

2DBC 

-.9171065276 B-l STAR 22 

X 

2DBC 

-.3500098785 B-i STAR 22 

y 


I 
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054T 

14,3543 

74744 

054T 

14,3544 

74104 

0548 

14,3545 

70805 

0548 

14,3548 

83103 

0549 

14,3547 

77154 

0549 

14,3550 

54113 

0550 

14,3551 

61601 

0550 

14,3552 

62472 

0551 

14,3553 

60604 

0551 

14,3554 

63166 

0552 

14,3555 

77033 

0552 

14,3556 

63044 

0553 

14,3557 

73162 

0553 

14,3560 

53261 

0554 

14,3561 

60431 

0554 

14,3562 

63350 

0555 

14,3563 

00660 

0555 

14,3564 

2278 3 

0556 

14,3565 

04045 

0556 

14,3566 

01424 

0557 

14,3567 

62165 

055T 

14,3570 

45335 

0558 

14,3571 

07327 

0558 

14,3572 

21564 

0559 

14,3573 

03267 

0559 

14,3574 

34557 

0580 

14,3575 

63472 

0580 

14,3576 

50705 

0561 

14,3577 

11661 

0581 

14,3600 

21433 

0582 

14,3601 

75501 

0582 

14,3602 

72421 

0563 

14,3603 

70431 

0563 

14,3604 

65316 

0564 

14,3605 

07510 

0564 

14,3606 

12666 

0565 

14,3607 

13727 

0565 

14,3610 

21520 

0566 

14,3611 

72161 

0566 

14,3612 

43161 

0567 

14,3613 

11144 

0567 

14,3614 

32323 

0568 

14,3615 

64200 

0568 

14,3616 

76476 

0569 

14,3817 

71323 

0569 

14,3620 

70264 

0570 

14,3621 

16403 

0570 

14,3622 

05717 

0571 

14,3623 

01365 

0571 

14,3624 

17662 


0 

2PBC 

-.1908106439 

B-1 

STAR 22 

Z 

1 

0 


-.4524416631 

B-1 

STAR 21 

X 

0 

1 

2PBC 

-.0492700670 

B-1 

STAR 21 

r 

0 

1 

2PBC 

-.8904319187 

B-1 

STAR 21 

z 

1 

0 

2DBC 

-.9525633510 

B-1 

STAR 20 

X 

0 

1 

2DBC 

-.0591313500 

B-1 

STAR 20 

If 

1 

0 

7Pec 

-.2985406935 

B-1 

STAB 20 

z 

1 

1 

Tpec 

-.9656240240 

B-1 

STAR 19 

X 

1 

1 

2PeE 

*.0528067543 

B-1 

STAR 19 

Y 

0 

1 

JDBC 

*.2545224762 

B-1 

STAB 19 

z 

1 

1 

JPEG 

-.8606970465 

B-1 

STAR 18 

X 

0 

0 

2PBC 

*.4638127405 

B-1 

STAB 18 

Y 

0 

1 

JDEC 

*.2099484122 

B-1 

STAB 18 

Z 

1 

0 

2Pec 

-.7741360248 

B-1 

STAR 17 

X 

0 

0 

jpec 

*.6154 234025 

B-1 

STAB 17 

Y 

0 

1 

jpec 

-.1482142053 

B-1 

STAR 17 

Z 

0 

0 

Tpec 

-.4656185921 

B-1 

SWB 18 

X 

0 

1 

2PEC 

*.4775804724 

B-1 

STAR 16 

Y 

1 

1 

2PBC 

*.7450624681 

B-1 

stab 16 

Z 

0 

1 

2PBC 

-.3811937602 

B-1 

star 15 

X 

0 

0 

7pec 

*.5748077840 

B-1 

star 15 

Y 

1 

1 

TPec 

-.7342581827 

B-1 

STAR 15 

Z 

0 

0 

TPBC 

-.41165 02829 

B-1 

star 14 

X 

0 

1 

2pec 

*.9066387314 

B-1 

STAR 14 

Y 

0 

0 

0 

JpBC 

*.0924676785 

B-1 

star 14 

Z 
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14.382S 

14.3828 

75055 0 
75101 0 

2000 

-.1816957154 B-i 

STAR 13 

X 

14,3827 

14.3830 

17030 1 
32613 1 

2Dec 

♦.9405318128 B-i 

STAR 13 

Y 

14.3831 

14.3832 

73321 0 
65667 0 ' 

2D0C 

-.2869039173 B-i 

STAR 13 

Z 

14.3833 

14.3834 

77010 0 
66714 0 

2D0C 

-.0614360769 B-i 

S»R 12 

X 

14.383S 

14.3838 

11515 0 
05314 1 

2DBC 

>.6031700106 B-i 

STAR 12 

y 

14.3837 

14.3840 

63215 1 

53830 1 

2DBC 

-.7952430739 B-i 

STAR 12 

z 

14.3841 

14.3842 

02145 0 

21163 0 

2pec 

♦ .1373948084 B-i 

STAR 11 

X 

14.3843 

14.3844 

12715 1 

21123 1 

2Pec 

♦ .6813398852 B-i 

STAR 11 

y 

14.3845 

14.3648 

13401 0 

26125 0 

JpBC 

♦.7189566241 B-i 

STAR 11 

z 

14,3647 

14.3850 

03161 1 

14610 0 

20BC 

♦ .2013426456 B-i 

STAR 10 

X 

14,3651 

14,3852 

17401 1 

36465 0 

2oec 

♦.9689888101 B-i 

STAR 10 

y 

14.3653 

14.3654 

75552 1 

56556 1 

2DBC 

-.1432544058 B-i 

STAR 10 

z 

14.3655 

14.3856 

05473 1 

01565 0 

2D0C 

♦.3509587451 B-i 

STAR 9 

X 

14,3657 

14,3860 

16217 1 

31643 1 

2D0C 

♦ .8925545449 B-i 

STAR 9 

y 

14,3861 

14,3662 

04417 1 

22211 0 

2PBC 

♦.2831507435 B-i 

STAR 9 

z 

14.3663 

14.3664 

06444 0 

33354 0 

2DGC 

♦.4107492871 B-i 

STAR 8 

X 

14,3665 

14,3866 

07765 1 

20153 1 

2Dec 

♦.4987190610 B-i 

star 8 

Y 

14,3867 

14,3670 

14154 1 

23613 1 

2DBC 

♦.7632590132 B-i 

STAR 8 

Z 

14.3671 

14.3672 

13202 0 

05024 1 

2DBC 

♦.7033883645 B-j 

STAR 7 

X 

14.3673 

14.3674 

13243 0 

07665 0 

2DBC 

♦.7074274193 B-i 

STAR 7 

Y 

14.3675 

14.3676 

01067 1 

01242 1 

2060 

♦.0692188921 B-i 

STAR 7 

Z 

14,3677 

14.3700 

10561 1 

05666 1 

2060 

♦.5450662811 B-i 

star b 

X 

14.3701 

14.3702 

10401 0 

00357 0 

2060 

♦.5313738486 B_i 

STAR 6 

y 

14.3703 

14.3704 

65477 0 

61124 1 

2060 

-.6484940879 B-i 

star 6 

z 

14.3705 

14.3706 

00154 1 

03111 0 

2060 

♦.0131955837 B-i 

star 5 

X 




I 
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20*35 OtJT. 28,1988 SATRAP .OOT PACE 1361 
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0S9T 

059T 

0598 

0598 

0599 
0599 
0000 
0000 
.0601 
0601 
0602 
0602 
0603 

0603 
0004 

0604 

0605 

0605 

0606 
0606 
060T 
060T 
0608 
0608 
0809 

0609 
OdilO 

0610 
0611 


14,3T0T 

00077 1 

■gsc 

14,3T10 

35676 0 


14,3711 

17777 0 

2PBC 

14,3712 

01142 1 

2PBC 

14,3713 

07674 0 

14,3714 

11416 1 


14,3715 

03415 1 

2Dec 

14,3716 

12707 1 

2Dec 

14,3717 

‘ 62413 0 

14,3720 

43135 1 

2BBC 

14,3721 

07511 0 

14,3722 

03423 1 

2pec 

14,3723 

01672 0 

14,3724 

12054 0 

20ec 

14,3725 

15735 1 

14,3728 

15405 1 

2Pec 

14,3727 

16745 0 

14,3730 

21763 0 


14,3731 

026 13 1 

2PBC 

14,3732 

24675 0 

2{SC 

14,3733 

73007 1 

14,3734 

50430 0 


14,3735 

15777 1 

2DeC 

14,3738 

12457 1 


14,3737 

00324 1 

2Pec 

14,3740 

03265 0 

2C«C 

14,3741 

07571 0 

14,3742 

17020 0 


14,3743 

15325 1 CATUX3 

Dec 


+.0078043793 

B-1 

STAR 

5 

Y 

+.9998824772 

B-1 

SDAR 

5 

Z 

+.4917355818 

B-1 

5»R 

4 

X 

+.2203784481 

B-1 

STAR 

4 

Y 

-.8423950835 

B-1 

star 

4 

Z 

+.4776746280 

B-1 

STAR 

3 

X 

+.1164935557 

B-1 

S»R 

3 

Y 

+.8707790771 

B-1 

STAR 

3 

Z 

+.9342726691 

B-1 

STAR 

2 

X 

+.1732973829 

B-1 

STAR 

2 

Y 

-.3116128956 

B-1 

STAR 

2 

Z 

+.8749183324 

B-1 

STAR 

1 

X 

+.0258916990 

B-1 

STAR 

1 

Y 

+.4835778442 

B-1 

STAR 

1 

Z 


6869 
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L AOC BUKkC WO 

ROOOl PROQRAM IXESt^PTICN 
R0003 PROGRAM NAME - SELP-CHEQc 
ROODS MOO NO - 1 
ROOOT HCD BY . CHiKIT 
R0008 RIUCTIQML DBsQUPTICM 


R0039 

R0041 


20 ’35 OCT. 28,1908 SATRAP .OOT PAGB 1362 

USERkS PAOB no. 1 EO S3 

MW 20 DBCMER 198T 

LOO SBCTICN aoc BLOOc two SELP-CHRCK 

ASSSeLY SOBHOUTINB uriLITYM REY 25 


s rss '»» » ™ ""■»»- 

A CCNTROLLHJ by PUTTINO DIPPEHSNT NIJCERS IN THE sWr^Iot^N^SS^ is 

OCIAL, TO UMO INTO LoD^ ^ COIPUTEH THAT ARB CHEQcED BY THE OPTKHS, AND THE CORRESPOTOINO NIPTOH, IN 

♦-4 • erasable fBCRY 
♦-5 PWBD IBCIIY 

♦-1.2,3.8,T,10 EVEHYTHINO IN OPTICKS 4 AND 5 
-0 SAf® AS *-10 UNTIL AN ERROR I3 DETECTED. 

♦0 NO CUBdc. POTS CCMPinER INTO THE BACKUP IDLE LOOP 
RARNINOS 

lEVBN IN IDLE LOOP) AS TEMP STORAGE BY ODffiH PROGRAMS IS DANGEROUS 
CALLINO^aUWCE****** WAN OCT 10 PUTS CCMPUTER INTO BACKUP IDLE LOOP. 

TO CALL SELF-CHECK KEY IN 

V 21 N 27 E OPTICN NIPBER B 
TO CALL anr-BANKSLM KEY IN 

V 91 B di splay s FIRST BANK 

V 33 E PROCEED, DISPLAYS NEXT BANK 

EXIT MOOES, HOSMAL AND ALARM 


Saj’-OeCK NCSMALLY CCNTINUBS INDEFINITELY UNLESS THERE IS AN ERROR DETECTED IF SO ♦ OPTKK NU«BRS PUT 
CQMPUIEH WTO BACKUP IDLE LOOP, - OPTICN NIPBERS RESTART THE OPTICN I 80 ♦ OPTHN NtPBBRS PUT 

THE -0 (WICN PROCEEDS FRCM THE LINE FOLLOWING THE LINE WHERE THE ERROR WAS DETECTED. 

aiar-aAiKaH prockbds until a teiwinate is keyed in cv 34 e). the ccmputer is put into the backup idle lcxjp 
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AOC BUlCtC TOO SEUP-WEQC 


M061 

m063 

aooes 

■ooeT 

B0089 

U0T3 

MOTS 

moTe 


UaBBaS PAOB NO. 2 


EO S3 


BBLP-CHBClC UPON WffiCriNO AN BBBDR U»DS THE SELP-CHECK ALARM CCMSTANT (01102) INTO THE PAILW ^ 

■nuns (U IHB ALAIM LICWP WB OPERATOR MAY THJW DISPLAY THE THREE FAILBEOS BY KEYING IN V OS N 09 B; TOR FURTHER 
^^^iSThE^ SywVosTobT the DSKY DISPWY in R1 will be address*! op WHERE THE ERROR WAS DEIECIED. 

An5 IN R3 THE TOIAL NIPBER OP ERRORS DETECTED BY SELP-OIEQC SIN(S THE UVST MAN 

INITIATTO^F^^ STAKTINO with hank .0 DISPLAYS IN Rl THE BANK SLM (A +-NIHBER EOJAL TO THE HANK NIPBER), IN B2 
the hank nipber. and in H3 the buqoer word, 
erasable initialization BEQUISfflD 


■Borr 

nWT8 

mOT9 

M080 

n»82 

10084 

•085 

•086 

•08T 


ACXXMPLI9IED BY PRE9I START 
940DB SET TO *0 

DEBRIS 

ALL EXITS PWM THE CffiCK OP ERASABLE (BBASC»C) RESTORE ORIGINAL CQITEMTS TO REGISTERS U®ER CHE^. 

exception IS A restart. RBSIAHT that occurs DURING ERASCrtC RESTORES ERASABLE, INLESS THERE IS EYIDFNCE TO DOBT 
E HBNORY IN WHICH CASE PROGRAM THBI DOES A FREai START (DOPSTART) . 

bank 25 
SBTLOC SELPCHEC 

bank 


REP 


2S.3T66 

43.2000 

43,3230 


•088 REP 


•089 

•090 

•091 

•092. 

0093 

•094 

•095 

•098 

•09T 

•098 

•099 

•100 

•101 

•102 

•103 

0104 

•105 

•108 

•lOT 

•108 

•109 


REP T8 
REP 44 
REP 33 
REP 40 
REP 39 
REP 44 
REP 53 
REP 28 
REP 32 
REP 3T 
REP 35 
REP 31 
REP 44 
HEP T5 
REP 49 

REP 252 
REP TT 
REP 45 
REP 45 
REP 19 
REP 28 


LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 


1174 

1174 

1174 

1174 

1089 

1131 

1171 

1196 

1010 

1174 

1174 

1174 

1174 

1335 

1174 


LAST 1294 
LAST 1363 
LAST 1363 
LAST 1337 
LAST 1335 
LAST 1109 


4712 

4711 

4710 
4707 
4706 
4705 
4704 
4703 
4702 
4701 
4700 
4677 
4876 
4875 
4674 

4714 

4712 

4711 
6214 
4710 

4715 


CCIKT 43/®LP 


SSITl 

S81T2 

S8IT3 

®IT4 

SBITS 

S81T8 

38177 

S8IT8 

saiT9 

S8IT10 

S8IT11 

SBIT12 

S8IT13 

3SIT14 

S8IT15 

s*zebo 

S*1 

S*2 

S*3 

S+4 

S*5 


EQUALS 

EQUALS 

equals 

EQUALS 

BOJALS 

EQUALS 

equals 

equals 

EQUALS 

equals 

equals 

EQUALS 

EQUALS 

equals 

Ea»LS 


BITI 

BIT2 

BIT3 

BIT4 

bits 

bits 

BIT7 

bits 

BIT9 

BITIO 

BITll 

BIT12 

BIT13 

BIT14 

BITTS 


equals zero 

EQUALS BITl 
equals BIT2 
EQUALS THREE 
EQUALS POUR 
EQUALS PIVE 
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III 


•110 

•til 

•112 

•113 

•114 

•IIS 

•lie 

•IIT 

•118 

•119 

0120 

•121 

•122 

•123 

•124 

•125 

0120 

•12T 

•128 

•129 

•130 

•131 

0132 

•133 


40 IAST 1338 8211 

•S' 18 IAST 11T4 4718 

IBP 13 LAST 1184 4373 

•BP 4 IAST 1062 4728 

43.3230 

43.3231 

^ 8 LAST 1174 4744 

43.3232 

43.3233 

■BP 19 LAST 1099 4747 

■HP 4 LAST 919 4755 

■BP 8 LAST 1174 4364 

43.3234 

43.3235 

43.3236 

43.3237 

43.3240 

43.3241 

■BP 2 LAST 199 5630 

■BP 3 LAST 1083 6061 

■BP 3 LAST 569 7714 

■HP 8 LAST 1178 7715 

■BP 29 LAST 1174 7718 

■HP 15 LAST 1071 4713 


S48 EQUALS SIX 
S4.7 equals SVB« 
seBiTs equals Loas 

CNTHWK = OCISO 

00061 0 BRASOOIi octal 00081 
01373 1 EBA3C0N2 OCTAL 01373 
BBASCCNa = aCTi400 
01481 0 BHA3C<K3 OCTAL 01481 
01773 0 EHA3CCN4 OCTAL 01773 
SIOBITS equals LQ»io 
S8NK03 equals PRIOs 
-MAxADRS = HI 5 
00060 1 SIXTY octal 0OO6O 
60017 1 SUPBCOI OCTAL 80017 
17777 0 S13BIT3 OCTAL 17777 
25 25 2 0 CCNC+Sl OCTAL 25252 
52400 1 CO<C*S2 OCTAL 53400 
76777 1 EBASCCW5 OCTAL 78777 

3-7 r OCTT7776 
S-4 equals NBG 4 
3-3 equals NBG 3 

S-2 equals J®G 2 
3-1 EOIALS NBCXMB 
S-2BRO EQUALS NEBo 


•134 ■»» 48 LAST 1205 £3,1400 

•135 BBP 3 LAST 257 43,3242 

•138 BBP 4 LAST II90 43,3243 

■0137 
■0138 
■0139 


EaANK= LSn 

01371 0 ADHSi ADRBS SCHEPl 
03334 0 SELPADRS ADHES SELPCrtc 


•140 BBP 8 LAST 182 43,3244 

43,3245 

•142 «BP 1 43,3246 

43i3247 

•144 BBP 3 LAST 182 43,3250 

•145 BBP 3 last 18 2 43,3251 

43,3252 

•147 *P 2 LAST 257 43,3253 

•148 ■H' 7 IAST 1384 43,3254 

43,3255 

0150 BW 303 last 1287 43,3256 

0151 BHP 3 LAST 382 43,3257 

0152 BBP 3 LAST 266 43,3260 

•153 BEP 3 LAST 179 43,3261 

0154 BBP 1 43,3262 

*155 43,3263 

0156 BHP 5 LAST 266 43,3264 

0157 OS' 3 LAST 1384 43,3265 


3 1360 

0 

PHERHOHS CA 

ERBSTOHE 

0 0006 

1 


extend 


1 3255 

1 


82F 

errors 

0 0006 

1 


Exiaro 


3 1376 

1 


DCA 

aiEBP5 

51«377 

0 


INDEX 

acHEPI 

52 001 

1 


DXCH 

0000 

3 4714 

1 


CA 

StTPBO 

55«360 

1 


T3 

ehestqrb 

0 0004 

0 

errors 

INHINT 


3 0002 

0 


CA 

0 

55«357 

0 


TS 

S'AIL 

55«363 

1 


TS 

almcaor 

25«365 

0 


INCR 

BHCCUNr 

0 5541 

1 

TCALARN2 TC 

AlAtWz 

01102 

0 


OCT 

01102 

11«362 

0 


CCS 

SMODB 

3 4714 

1 

SIDCXXJP 

CA 

s»zEao 




20’35 OCT. 28,1968 SATRAP .007 PACE 1384 
U8 BR>S pace no. 3 Eo S3 


00377 

USED IN QrrKtoc 

usai IN erasqk 

USED m EBASQK 
U^ IN ERASCIK 
U^ IN ERASOK 
USED IN ERASCHC 
01777, USa> IN EBASOK 
06000, USH> IN ROPECHC 
POR ROPBCrtc 


UffiD IN ROPECI9C 

U®3 IN CYCLaiPT 
USED IN CYCLSIPr 


SELP09C BElUiej ADDRESS. SHOULD BE PUT 
IN SELPHET BHEN going FHCM SEIPCrtc TO 
aiOPSUM AND PUT IN acffiPi WHEN GOING 
PHCM SHOWSLM TO SELP-CHEQc. 

IS IT NECESSARY TO RESTORE ERASABLE 

NO 




restore the two erasable registers 


SAVE 0 POR PAIUJRE LOCATION 

FOR DISPLAY WITH BBANK AND ERCOUNT 

KEEP TRACK OP NIWBBR CP iHAIPUNCTTICNS. 

SEIJ'-CHECK malfunction INDICATOR 



ASSBCLB REVISIOK 249 OP AOC PROORAM OOUJSSUS B¥ NASA 2021111-041 




AOC Buictc iwo setp-xtecK 


20*35 OCT. 28,1968 SATBAP .OOT PAOB 1365 
U8BR«S PAOS no. 4 83 S4 


0158 

HEP 

e 

lAST 1364 

43,3268 

0159 

REP 

5 

lAST 1364 

43,3267 

0160 

REP 

.4 

1>ST 1364 

43,3270 

0161 

REP 

344 

LAST 1338 

43,3271 

0162 

REP 

1 


43,3272 

0163 

REP 

2 

lAST 1365 

43,3273 

0164 

REP 

345 

lAST 1365 

43,3274 

0165 

REP 

3 

lAST 1385 

43,3275 

0166 

REP 304 

LAST 1384 

43,3276 

0167 




43,3277 

0168 

REP 

4 

LAST 1384 

43,3300 

0169 

REP 

1 


43,3301 

0170 

REP 

7 

LAST 1385 

43,3302 

0171 

IBP 

1 


43,3303 

0172 

HEP 

1 


43,3304 

0173 

, HEP 

2 

LAST 1365 

43,3305 

0174 

REP 

2 

LAST 80 

43,3306 

0175 

HEP 

5 

lAST 1365 

43,3307 

0176 

HEP 

1 


43,3310 

0177 




43,3311 

0178 




43,3312 

0179 

REP 

1 


43,3313 

0180 

REP 

3 

LAST 1385 

43,3314 

0181 

HEP 

1 


43,3315 

0182 

REP 

346 

LAST 1365 

43,3316 

0183 

REP 

1 


43,3317 

0184 

IBP 

6 

LAST 1365 

43,3320 

0185 

REP 

7 

LAST 1365 

43,3321 

0186 

REP 

8 

lAST 1365 

43,3322 

0187 

REP 

1 


43,3323 

0188 

REP 

1 


43,3324 

0189 

REP 

9 

lAST 1365 

43,3325 

0190 

REP 

10 

LAST 1365 

43,3326 

0191 

REP 

11 

LAST 1365 

43,3327 

0192 




43,3330 

0193 

REP 

7 

LAST 1190 

43,3331 

0194 

REP 

61 

LAST 1230 

43,3332 

0195 

REP 

2 

LAST 1185 

43,3333 

0196 

REP 

2 

lAST 1385 

43,3334 

R0197 

skeept holds lowest op two AI 

R0198 

SKEBP6 HODS B(X*1). 


R0199 

SKBBP5 HOLDS BCX) . 


80200 

SKEBP4 HOLDS CCEBANK) DURING 


a*x>e 
SBLPCttC 
SPA It, 


OO TO IDLE UX3P 
(XKTINlB WITH SElP-OHECtC 


10 000 0 
1 3244 1 
1 3244 1 
10 000 0 
1 3244 1 
0 0002 0 


A 

PBEEBtORS 

PRBRRORS 

A 

PPBRRORS 

O 


0 0006 1 
23«371 0 
0 3330 1 
11«38 2 0 
0 3310 0 
0 3301 0 
0 3310 0 
2S«366 0 
0 1371 0 


9«DeC»C B)C®© 

CMCH SKEBPl 

tc oec^j 

CSS 94008 

TC SOPTICNS 

TC SACOeCtfC *2 
TC SOPTICNS 

INCH SCOUNT 

TC acBBPl 


CHBCIC FOR NEW JOB 


TO BACtoH* IDLE LOOP 


(XHTINUE WITH SELP-CMECK 


0 3265 0 
25»366 0 
6 4716 0 


SOPTICNS AD S-7 

EXTSND 
BZMP *2 

bnkoptn tc SIDLOOP 

INCR SCOUT 
AD S+T 


POR OPTICNS ffiLOW NINE. 

ILLBQAL OPTICN. GO TO IDLE LOOP. 
POR OPTICNS BELCW NINE. 


SO 000 1 
0 3320 0 
0 1371 0 
0 1371 0 
0 1371 0 
0 3335 1 
0 3516 0 
0 1371 0 
0 1371 0 
0 1371 0 


INDEX 

TC 

SOPTICNl TC 
SOPTI(N2 TC 
SOPTICN3 TC 
SOPTICN4 TC 
SOPTICNS TC 
SOPTICNS IC 
SOPTICNT TC 
SOPTCNlO TC 


SOPTICNl 

9CEEP1 

SCSEPl 

SKEBPl 

BRASC54C 

HOPECHC 

acEEPl 

9CEEP1 

acEEPl 


WAS TC+ICP 
WAS W’Om 
WAS COJNTQ9C 


CCNTINUE WITH SELP-CHECk 


43,3330 0 0006 1 CNBCTOCJ EXT®® 


23«361 1 
0 4574 0 
03231 1 


OCCH »LPBBT 
TC POSTJIWP 
CADR ACVAN 


SAVE REIOHN ADDRESS VMILE TESTING NEwJOB 
TO SEE IP ANY JOBS HAVE BECC>e ACTIVE. 


selpchk tc 


3M0DEOK 


4* CHARLEY, Coe IN HERE 







Ill 
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20’35 OCT. 28,1960 SATBAP .OOT PACE 1386 



VSBOmS PAGE NO. 9 


B3 S4 


MMl 

acBBP 3 mtos LAST ADDRBSS B 8 INO CtffiClteD (HIGHEST ADDRESS) 


110202 

aCEB^ OOnSOLS QGQcINO op NCM-SSrllOfABlB BRASABLS WITH BANIC Tt4 m 

>0204 

nASQX 

WlfflS APPRO0441ELY 7 

SECXHDS 



■ 

020S 

KE 

2 

last 257 

43,3335 

3 4712 1 

ebaschc CA 

Sfl 


0206 


3 

LAST 257 

43,3338 

55«372 1 

TS 

SKEBP 2 


020T 

iBP 

4 

last 1384 

43,3337 

3 4714 1 

OBBANK CA 



0206 

WE 

51 

lAST 1164 

43.3340 

54 003 0 

TS 

ehank 


>209 

WE 

1 


43,3341 

3 3232 1 

CA 

ERA 3 CCN 3 

01481 

>210 

KBE 

4 

last 1384 

43,3342 

55«377 1 

TS 

S(0BP7 

STARTlNa ADDRESS 

>211 

WE 

1 


43,3343 

3 4747 1 

CA 

siobits 

01777 

0212 

BEE 

3 

last 257 

43,3344 

S5-373 0 

TS 

SKEEP 3 

lAST address CHECXHD 

0213 

>HE 

1 


43,3345 

0 3365 1 

TC 

BRA SLOOP 


>214 

BBE 

1 


43,3346 

3 4744 1 

E134567B CA 

BRAsCCHe 

01400 

>215 

WE 

5 

LAST 1388 

43,3347 

55«377 1 

TS 

a<BBP7 

SDARTINO ADDRESS 

0210 

BEE 

2 

LAST 1388 

43,3350 

3 4747 1 

CA 

SIOBITS 

01777 

021T 

WE 

4 

LAST 1386 

43,3351 

55«37 3 0 

TS 

a(EEP 3 

LAST ADDRESS CHECKED 

>21> 

WE 

2 

LAST 1388 

43.3352 

0 3365 1 

IC 

era SLOOP 


0219 

WE- 

2 

LAST 1388 

43,3353 

3 4744 1 

2 H)ANK CA 

ERASCCN 6 

01400 

0220 

BBE 

8 

LAST 1388 

43,3354 

55«377 1 

TS 

SKEBP 7 

SWRTINB ADDRESS 

0221 

BBE 

1 


43,3355 

3 3233 0 

CA 

ERA 9 COI 4 

01773 

0222 

BEE 

5 

LAST 1388 

43.3356 

55«373 0 

TS 

a(EEP 3 

LAST address checked 

0223 

BBE 

3 

last 1388 

43,3357 

0 3365 1 

TC 

ERA SLOOP 


>224 

WE 

4 

LAST 1388 

43,3380 

55«372 1 

NOEBANk TS 

a<EEP 2 

4^0 

0225 

BBE 

1 


43,3381 

3 3230 0 

CA 

EHASCCNi 

00061 

0226 

BEE 

■ 7 

LAST 1388 

43,3382 

55«377 1 

TS 

SKEEPI 

SIARTINO ADDRESS 

022T 

BBE 

1 


43,3383 

3 3231 1 

CA 

EBASCCNz 

01373 

0228 

BBE 

6 

LAST 1386 

43,3364 

55-373 0 

TS 

SKEEP 3 

LAST ADDRESS CHECKED 

0229 




43,3385 

■0 0004 0 

BBAaXJOP INHINT 



0230 

BBE 

52 

LAST 1386 

43,3386 

3 0003 1 

CA 

ebank 

STORES C(HIANK) 

0231 

BBE 

3 

LAST 182 

43,3367 

55-374 1 

TS 

a<EEP 4 


0232 




43,3370 

0 0006 1 

eXTEND 



0233 

■BE 

8 

LAST 1368 

43,3371 

5 1377 0 

NPX 

skeept 


0234 




43,3372 

3 0001 0 

DCA 

0000 


0235 

BBE 

4 

last 1384 

43,3373 

53-376 0 

DXCM 

SKEEP5 

STORES C(X) AND C(X +1 

0236 

BBE 

9 

LAST 1368 

43,3374 

3 1377 0 

CA 

aCBEPT 


023T 

BBE 

8 

LAST 1364 

43,3375 

55-360 1 

TS 

ere STORE 

IP RESTART, RESTORE C* 

0238 

BBE 213 

LAST 1294 

43,3376 

54 001 1 

TS 

L 


0239 

BBE 214 

LAST 1386 

43,3377 

24 001 0 

INCH 

L 


0240 

BBE 34T 

LAST 1365 

43,3400 

50 000 1 

NDX 

A 


0241 




43,3401 

52 001 1 

DXOI 

0000 

PUTS OWN ADDRESS IN X 

0242 

BBE 

10 

LAST 1386 

43,3402 

51-377 0 

NDX 

acEEPr 


0243 




43,3403 

4 0001 1 

C3 

8001 

CS X*1 

0244 

■BE 

11 

LAST 1366 

43,3404 

51-377 0 

NDX 

a<EEP 7 


0245 




43,3405 

6 0000 1 

AD 

0000 

AD X 

0248 

IW 

1 


43,3408 

0 3271 0 

TC 

-iCrtc 


024T 

BBE 

9 

LAST 1366 

43,3407 

3 1 360 0 

CA 

ere STORE 

HAS ERASABLE BEEN RES! 






ASSBflU! BBVlSiaN 249 OP AOC PROGBAM COLOSSUS BT MAS* 2021111-041 
AOC BLOCK T*0 aBLP-CKBQC 





43,3410 

0 0006 

1 

REP 

1 


43,3411 

1 3435 

1 




43,3412 

0 0006 

1 

BBP 

12 

lAST 1366 

43.3413 

5 1377 

0 




43,3414 

4 0001 

1 

REP 

13 

LAST 1367 

43,3415 

51«377 

0 




43,3416 

52 001 

1 

REP 

14 

lAST 1387 

43,3417 

51«377 

0 




43.3420 

4 0000 

0 

REP 

15 

LAST 1387 

43,3421 

51-377 

0 




43,3422 

6 0001 

0 

WP 

2 

LAST 1366 

43,3423 

0 3271 

0 

BBP 

10 

lAsr 1366 

43.3424 

3 1360 

0 




43,3425 

0 0006 

1 

REP 

2 

LAST 1387 

43,3426 

1 3435 

1 




43,3427 

0 0006 

1 

IBP 

5 

LAST 1386 

43,3430 

3 1376 

1 

RBP 

16 

LAST 1367 

43,3431 

51-377 

0 




43,3432 

52 001 

1 

REP 

5 

lAST 1386 

43.3433 

3 4714 

1 

REP 

11 

LAST 1367 

43,3434 

55-360 

1 




43,3435 

0 0003 

1 

HEP 

2 

LAST 1365 

43,3436 

0 3330 

1 

REP 

4 

LAST 1366 

43,3437 

3 1374 

0 

WP 

53 

LAST 1366 

43,3440 

54 003 

0 

RBP 

17 

LAST 1387 

43,3441 

25-377 

0 

EBP 

18 

LAST 1367 

43,3442 

4 1377 

1 

I»P 

7 

LAST 1366 

43,3443 

6 1373 

1 




43,3444 

0 0006 

1 




43,3445 

1 3447 

1 

BBP 

4 

LAST 1366 

43,3446 

0 3365 

1 

RBP 

5. 

LAST 1366 

43,3447 

11-372 

1 

BBP 

1 


43,3450 

0 3360 

1 

BBP 

6 

LAST 1387 

43,3451 

25-372 

0 

BBP 

54 

LAST 1367 

43,3452 

3 0003 

1 

BBP 

1 


43,3453 

6 4702 

0 

REP 

55 

LAST 1387 

43,3454 

54 003 

0 

REP 

1 


43,3455 

6 3241 

0 




43,3456 

0 0006 

1 

BBP 

1 


43,3457 

1 3353 

0 

BBP 

56 

LAST 1387 

43,3460 

10 003 

0 

BBP 

1 


43,3461 

0 3346 

0 

BBP 

3 

lAST 1366 

43,3462 

3 4744 

1 

BBP 

57 

LAST 1367 

43,3463 

54 003 

0 

CHTRCHK PERPORMS A 

CS OF ALL registers 

INCLlDBD ABE ALL COUNTERS, T8 

- 1 , CYCLE 

HEP 

1 


4393404 

3 4726 

0 

REP 

T 

LAST 1367 

43*3485 

55«372 

1 

RHP 

1 


43*3466 

6 4707 

0 

REP 348 

LAST 1366 

43,346T 

50 000 

1 


BXB#© 

BZP JiOOPPIN 

BlCTB© 

M3X SKBEPT 

DCS 0000 

J®)C aCEBPl 

DKCH 0000 

HDX SKBBPI 

Cs 0000 

MDC SCEEP7 

AO 0001 

ic -iCrtc 

CA BRBSIORB 

BXTB© 

BzP ELOOPPW 

BiCIBND 

DCA SKSEPS 

MJK SKEEPT 

OKOL 0000 

CA S+ZBBO 

TS EBESTORB 

ELOOPPIN BEL.INT 


TC 

CA 

TS 

INCH 

CS 

AD 

EXTB® 

BzP 

TC 

CCS 

1C 

INCH 

CA 

AD 

TS 

AO 

EXTB®) 

BZP 

CCS 

1C 

CA 

TS 


CHECKNJ 

a<EEP4 

EBANK 

acEEP? 

a<EEPT 

SKEEP3 

+2 

ERAa^OOP 

acEBPZ 

NCE8ANK 

9<EBP2 

EBANK 

S9IT9 

EBANK 

ERASCCN5 


20 ’35 OCT. 28.1968 SATRAP .007 PAGE 1367 
USIbtS PACE MO. 6 E3 S4 

YES, EXIT ERASUJOP. 

C<>IPLB«NT OP ADDRESS OP X AND X+1 
PITT CCMPia®^' OP ADDRESS OP X AND X+1 
CS X 
AD X*1 

HAS erasable been RESTORED 
YES, EXIT BRASUXJP. 

PUT b(x) ai® b(x+i) back into X and X*1 
IP restart, do not restore C(x), C(x+1) 

CHECK POR NEW JOB 
HEPIACES B(EBANK) 


go to next address in sa* bank 


POT +1 IN SKBBP2. 


76777, CHECK POR BANK Ez 


BZP 2EBANK 

CCS EBANK 

1C El 345670 CO TO EBA! 

CA ERASCCHe OF ER 

TS EBANK 

PRCM OCT. 60 IHRCoai OCT. 10. 

AND ailPT, AND ALL RJPT REGISTERS 
QITRCHK CA CNTRCCN 00050 

OTTRLOOP TS SKEEP2 

AD S8IT4 +10 OCTAL 

INDEX A 


GO TO EBANKS 1,3, 4,5, 6, AND T 
BJD OF ERASCLK 
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II 


0298 



0299 

REP 

6 

l>Sr 1387 

0300 

RS' 

1 


R0301 

CVCLSHPT CHBCICS THE 

0302 

REP 

1 


0303 

REP 

42 

LAST 1166 

0304 

REP 

22 

last 1156 

0305 

REP 

29 

last 1156 

0306 

REP 

11 

last 1078 

0307 

HEP 

43 

last 1368 

0308 

REP 

23 

last 1388 

0309 

®P 

30 

last 1388 

0310 

HEP 

12 

last 1388 

0311 

REP 

1 


0312 

HEP 

3 

last 1387 

0313 

REP 

44 

last 1368 

0314 

HEP 

24 

last 1368 

0315 

HEP 

31 

LAST 1368 

0316 

REP 

13 

last 1368 

0317 

REP 

3 

last 1386 

0318 

HEP 

4 

last 1368 

0319 

REP 

4 

last 1385 

0320 

REP 

3 

last 1365 

R0321 

SKEEPi HOLDS SUM 


43; 3470 

4 0000 0 

Cs 

0000 

43,3471 

11«372 1 

CCS 

*H8P2 

43,3472 

0 3465 0 

IC 

CNWLOOP 

CKCLE AND SIIPT HBGISIBHS 


43,3473 

3 3237 1 

CYCLaiPT CA 

OtWC+Sl 

43.3474 

54 020 1 

TS 

CYR 

43,3475 

54 022 0 

TS 

CYL 

43.3476 

54 021 0 

TS 

SR 

43,3477 

54 023 1 

TS 

HXIP 

43,3500 

6 0020 0 

AD 

CYR 

43,3501 

6 0022 1 

AD 

CYL 

43,3502 

6 0021 1 

AD 

SR 

43,3503 

6 0023 0 

AD 

BDOP 

43,3504 

6 3240 1 

AD 

OCNC+S2 

43,3505 

0 3271 0 

TC 

-iCHc 

43,3506 

6 0020 0 

AD 

CYR 

43,3507 

6 0022 1 

AD 

CYL 

43,3510 

6 0021 1 

AD 

SR 

43,3511 

6 0023 0 

AD 

BMP 

43,35 12 

6 4712 1 

AD 

S*l 

43,3513 

0 3271 0 

IC 

-lQ«C 

43,3514 

25«367 1 

INCH 

SCCLNT *1 

43,3515 

0 3277 0 

TC 

SWCDBCHc 


20*35 OCT. 28.1968 SAWAP .OOT PA® 1368 
USERoS PAGE NO, T B3 84 


25 252 

C(CYB) = 12525 

CfCVl,) = 52524 

C<SR) = 12525 

C(HX)P) = 00125 

37TTT C(CYR) = 45252 

00-12524 C(CYL) = 25251 

00-K251 C(SR) = 05252 

00-25376 C(HDOP) = +0 

C(CCNC+S2) = 52400 

45252 

T2S23 

TT7T5 

TTT75 

TTTT6 


R0322 

80323 

R0324 

B0325 

R0326 

B0327 

R0328 

R0329 

R0330 

0331 

03311 

03312 

0332 

0333 

0334 

0335 

0336 

0337 

0338 

0339 

0340 

0341 


^^2 HODS PREsavr conaiTS cp address in kopechk and shqaslm ROrriNEs 

a<EEP2 HOLDS BANK NIPCBR IN LQ7 ORDER BITS DURING 9I0WSIW DISPLAY 
9LEBP3 HOLDS PRESQTT ADDRESS (00000 TO 01777 IN COWCN PIxED BANKS) 

<04000 TO 07777 IN FXPX BANKS) 

SCEBP 3 HOLDS BuODER WORD DURING SHOflrsuM DISPLAY 
a<EBP4 HCIDS BANK Nl»«ER AND SUPER BANK NUNBER 
SKEEPS COUNTS 2 SUCCESSIVE 7C SELF WORDS 
a<EEP6 CQNTOOLS ROPECIK OR SIOWSLM OPTICN 

a<EEP7 CCKXR0L3 WHOI BCXITTINE IS IN COWOf FIXED OR FIXED FIXED BANKS 




LAST 

LAST 


REP 
REP 
REP 

REP 
REP 

REP 19 LAST 
HEP 7 LAST 
REF 12 LAST 
8 LAST 

5 

6 
8 


LAST 257 
LAST 1387 


REP 


LAST 
LAST 
LAST 
REP 215 LAST 


REF 

HEP 


1367 

1368 

1367 

1368 

1365 

1367 

1368 

1367 

1368 

1366 


43.3516 

43.3517 

43.3520 

43.3521 

43.3522 

43.3523 

43.3524 

43.3525 

43.3526 

43.3527 

43.3530 

43.3531 

43.3532 


3 4713 0 
5S«378 0 
3 4714 1 

55»3T4 1 
3 4712 1 
55«377 1 
3 4714 1 
55«371 1 
55«373 0 
3 4712 1 
55«375 0 
3 1374 0 
54 001 1 


ROPBCHc CA 
T3 

sraiosiM CA 


CQWX 


CCMADRS 


TS 

CA 

TS 

CA 

TS 

TS 

CA 

TS 

CA 

TS 


S-ZBRO 

aiEBPe 

s,zbho 

a<EEP4 

S»1 

a<EBP7 

S+ZERO 

aiEBPi 

SLEEPS 

S*1 

SLEEPS 

SLEBP4 

L 


* -0 FOR ROPBCHl. 

* SKXiD BE ROPBCrtL 

bank nubbr 


CCLNTS DOWN 2 TC SELF WORDS 
TO SET SUPER BANK 



llllW iilililii iiiiiiiliSiiiiii 




AS^OLB RBVISICN 249 OP AOC PSOOBAM COLOSSUS W NASA 2021111-041 



20*35 OCT. 2B,196B SATRAP .OOT PAOB 1369 


BLOCK TBO SBLP.XHBCK 


. T 

lAST 1384 

43,3533 

T 4364 

0 


9 

LAST 1388 

43,3534 

6 1373 

1 


2 

LAST 352 

43,3535 

0 4610 

1 


1 


43,3536 

0 3561 

0 


1 


43,3537 

6 4700 

1 


I 


43,3540 

0 3572 

1 


349 

LAST 1387 

43,3541 

4 0000 

0 

pypx 

20 

LAST 1368 

43,3542 

55«3TT 

1 




43,3543 

0 0006 

1 




43,3544 

1 3547 

0 


1 


43,3545 

3 4677 

0 




43,3546 

0 3550 

1 


1 


43,3547 

3 4755 

1 


10 

LAST 1369 

43,3550 

55«3T3 

0 


a 

LAST 1368 

43,3551 

3 4714 

1 


13 

LAST 1368 

43,3552 

55«371 

1 


B 

LAST 1368 

43,3553 

3 4712 

1 


T 

LAST 1388 

43,3554 

55«375 

0 


11 

LAST 1369 

43,3555 

51«373 

1 

PXADRS 



43,3556 

3 0000 

1 


2 

LAST 1369 

43,3557 

0 3561 

0 


2 

LAST 1369 

43,3560 

0 3572 

1 


9 

LAST 1368 

43,3581 

55«3T2 

1 

ADSU4 

14 

LAST 1369 

43,3562 

6 1371 

0 


15 

LAST 1369 

43,356 3 

55«371 

1 


9 

LAST 1369 

43,3564 

3 4714 

1 


16 

LAST 1389 

43,3565 

6 1371 

0 


IT 

LAST 1369 

43,3566 

55«3T1 

1 


10 

LAST 1369 

43,3567 

4 1372 

1 


12 

LAST 1369 

43,3570 

6 1373 

1 


305 

WST 1365 

43,3571 

0 0002 

0 


350 

last 1369 

43,3572 

22 000 

1 

ADRSQ9( 

13 

LAST 1369 

43,3573 

3 1373 

1 


20 

LAST 1384 

43,3574 

7 4747 

0 


1 


43,3575 

6 4364 

1 




43,3576 

0 0006 

1 


1 


43,3577 

1 3666 

0 


8 

LAST 1389 

43,3600 

11«375 

0 




43,3601 

0 3604 

0 




43,36 02 

0 3604 

0 


2 

LAST 1369 

43,3603 

0 3666 

1 


216 

LAST 1368 

43,3604 

10 001 

1 


1 


43,3605 

0 3614 

1 


2 

LAST 1369 

43,3606 

0 3614 

1 


3 

LAST 1369 

43,3607 

0 3614 

1 


9 

LAST 1369 

43,3610 

11«3T5 

0 


4 

LAST 1369 

43,3611 

0 3615 

0 




MASK 

HI5 

AD 

atEEPS 

ic 

SUHMCAL 

IC 

ADSUM 

AD 

»ITll 

TC 

ADRSCnc 

Cs 

A 

TS 

BXTB© 

SKBBP7 

BZP 

♦3 

CA 

»IT12 

IC 

♦2 

CA 

9NK03 

TS 

SKEBP3 

CA 

S^ZEBO 

TS 

acBEPl 

CA 

S*1 

TS 

SKEEPS 

INDEX 

SKBBP3 

CA 

0000 

1C 

ADSUM 

1C 

ADRSCrtc 

TS 

SKEEP2 

AD 

a<EEPl 

TS 

acEEPl 

CAP 

S+ZERO 

AD 

SKEEPi 

TS 

acEBPi 

CS 

acffiP2 

AD 

aKEEP3 

IC 

0 

LXCH 

A 

CA 

SKEEPS 

MAaC 

LOWIO 

AD 

EXTB® 

-MAXADRS 

BZP 

SOPTICN 

CCS 

acEEPS 

IC 

+3 

1C 

♦2 

IC 

SOPTIW 

CCS 

L 

IC 

CCNTINU 

1C 

CCNTINU 

1C 

CCKTINU 

CCS 

SKEEPS 

TC 

CCNTINU -1-1 


USERkS PAOB NO. e B3 S4 


SUPBR MIA CALL. 
02000 


04000, STAHTINO AEOHB8S OP HANK 02 
08000, SlAHTINO ADDRESS OP BAMC 03 


ccurrs do»n 2 ic ffiLP words 


relative address 

subtract max relative address = 1T7T. 

CHECKSUM PINiaiBD IP LAST ADDRESS. 

IS checksum pinishhj 

NO 

NO 

GO TO ROPECHC SHOWSUM OPTICN . 

-0 MEANS A IC SEIP WORD. 



I 


A 8»»8 sansiw 249 OP AOC KIOWAM colossus by NASA 2Q21U1-041 

MC Buxk m sBU'-oectc 


0389 

BBP 

1 

0390 

BBF 

S LAST 1369 

0391 

ler 

T LAST 1369 

0392 

HBP 

10 LAST 1309 

03921 

BESF 

5 LAST 1388 

03922 

BBP 

21 LAST 1190 

03923 

BEP 

4 LAST 828 

03024 

0393 

BBP 

3 lAST 136T 

0394 

BBP 

14 lAST 1369 

0395 

BBP 

21 lAST 1369 

0390 

BBP 

1 

0397 

BBP 

2 lAsr 1370 

0398 

80* 

1 

0399 

BBP 

2 LAST 1370 

0400 

HP 

T lAST 1368 

0401 

BBP 

1 

0402 

0403 

BBP 

1 

0404 

BBP 

8 lAST 1370 

0405 

BBP 

2 lAST 1389 

0406 

BBP 

t LAST 1370 

0407 

BBP 

1 

0408 

REP 

1 

0409 

BBP 

10 LAST 1370 

0410 

BBP 

1 

04il 

IBP 

8 LAST 1389 

0412 

0413 

BBP 

1 

0414 

BBP 

1 

0415 

0416 

0417 

BBP 

2 LAST 1370 

0418 

BBP 

1 

0419 

BBP 

11 LAST 1370 

0420 

BBP 

3 LAST 1370 

0421 

BBP 

1 

0422 

BEP 

12 LAST 1370 

0423 

BBP 

22 LAST 1370 

0424 

BS' 

1 

0425 

BBP 

8 LAST 1370 

0426 

IBP 

1 

0427 

BBP 

1 

0428 

BBP 

2 LAST 1370 


0429 

0430 

0431 


13 last 1370 
9 LAST 1370 
5 LAST 349 


43,3812 

: 3 7716 0 


CA 

S-1 

43,3613 

0 3615 0 


TC 

CCWTINU +1 

43,3614 

3 4712 1 

CCNTINU CA 

S 4 I 

43,3615 

55«375 0 


TS 

SKEEP5 

43,3616 

11«376 0 


CCS 

SKEEP6 

43,3817 

10 067 1 


CCS 

NEWJCB 

43,3820 

0 5057 0 


TC 

CMANOl 

43,3621 

0 3623 0 


TC 

♦2 

43.3622 

0 3330 1 


TC 

CHBCKNJ 

43,3823 

25«373 1 

ADHS+I 

inch 

9(EBP3 

43,3624 

11«377 1 


CCS 

3<EEP7 

43,3625 

0 3531 0 


TC 

CCHIORS 

43,3626 

0 3531 0 


TC 

CCMADHS 

43,3027 

0 3555 1 


TC 

FKADHS 

43,3830 

0 3555 1 


TC 

FXADRS 

43,3831 

4 1374 1 

NXTBNK 

CS 

a<EBP4 

43,3632 

6 3721 0 


AD 

lstbnkch 

43,3633 

0 0006 1 


BKiaJD 

43.3634 

1 3000 0 


BZP 

eiDSUMS 

43,3635 

3 1374 0 


CA 

9<EEP4 

43,3636 

6 4700 1 


AD 

»ITll 

43,3637 

55«374 1 


TS 

S<EBP4 

43,3640 

0 3844 1 


TC 

crtcsupR 

43,3641 

3 4674 0 

17TO20 

CA 

»ITi5 

43,3642 

27«374 1 


ADS 

S<EEP4 

43,3643 

0 3660 1 


TC 

OCNXTBNK 

43,3644 

7 4364 0 

CH<SUPB 

HAac 

HI5 

43,3645 

0 0006 1 


BKTBID 

43,3646 

1 3656 0 


BzP 

NXTSUPR 

43,3647 

6 3236 0 

27TO30 

AO 

313BITS 

43,3650 

0 0006 1 


EXTH® 

43,3651 

1 3653 0 


BZP 

♦2 

43,3652 

0 3660 1 


TC 

CXNXTBNK 

43,3853 

3 3234 1 


CA 

SIXTY 

43, 3654 

27«374 1 


AOS 

SKBEP4 

43,3655 

0 3660 1 


TC 

gchxtbnk 

43,3656 

6 3235 0 

NXTSUPR 

AD 

SUPRCCN 

43,3657 

27«3r4 1 


ADS 

a<^P4 

43,3660 

11«3T7 1 

GCWXTBNK CCS 

SKEEP 7 

43,3861 

0 3523 0 


TC 

CCM4PX 

43,3662 

3 4712 1 


CA 

S +1 

43,3663 

0 3541 1 

! 

TC 

FXFX 

43,3664 

3 4704 0 


CA 

SBITr 

43,3665 

0 3523 0 


TC 

COWFX 

43,3866 

3 1374 0 

SOPTICN 

CA 

acEEP 4 

43,3667 

7 4384 0 


MASK 

His 

43,3670 

0 4345 1 


TC 

LHTS 


\ i 



20*35 0t?r. 28.1068 SATBAp .007 PAOB 1370 
USOUS PAOB NO. 9 B 3 84 

AD IN niB BUOOBR WORD 

hike aUHB TWO CCNSBCUrivB TC SELP WORDS 

♦ 

♦ *1, awwsiM 

♦ 

* 

-0 IN a«BP8 BOB ROPBQ9C 


LAST bank to be CHECKED 
BTO OP SLWINO OP banks. 

37 TO 40 INCIMTS SKEEP 4 BY Bfl!) KTO CARRY 

set POR BANK 20 

INCRBeiT SUPER rank 

bank set for 30 

FIRST SUPER RANK 

set BNK 30 + INCR SUPR BNK AND CANCEl, 

BBC BIT OP THE 37 TO 40 ADVANCE. 

HAS TO BE LARGER THAN NO OP FXS* BANKS. 


= BANK BITS 





Ill 


ASSS^BLB BBVISICN 249 CF AOC FROOBAM COLOSSUS BY NASA 2021111-041 


L 

AGO 

buick two ffiLP-xtecK 



0432 

REP 

217 

LAST 1369 

43,3071 

54 001 

1 

0433 

REP 

14 

LAST 1370 

43.3072 

3 1374 

0 

0434 

REP 

1 


43,3873 

7 4373 

0 

0435 




43.3874 

0 0006 

1 

0438 

HEP 

1 


43,3875 

1 3703 

1 

0437 

REP 

32 

LAST 1368 

43,3876 

54 021 

0 

0438 

H^ 

218 

LAST 1371 

43.3877 

3 0001 

0 

0439 

RH' 

19 

lAST 1364 

43.3700 

7 4716 

1 

0440 

HEP 

33 

lAST 1371 

43.3701 

6 0021 

1 

0441 

REP 

219 

LAST 1371 

43.3702 

54 001 

1 

0442 

REP 

6 

LAST 1370 

43,3703 

3 1376 

1 

0443 




43.3704 

0 0006 

1 

0444 




43,3705 

1 3707 

0 

0445 

US' 

1 


43.3706 

0 2762 

0 

0446 

HEP 

18 

LAST 1369 

43.3707 

11-371 

1 

04461 




43,3710 

0 3712 

0 

04462 




43.3711 

0 3713 

1 

04463 

REP 

9 

LAST 1370 

43,3712 

6 4712 

1 

04464 

REP 

19 

LAST 1371 

43,3713 

55«371 

1 

0447 

REP 

220 

LAST 1371 

43,3714 

4 0001 

1 

0448 

BEF 

20 

LAST 1371 

43,3715 

6 1371 

0 

0449 

HEP 

2 

LAST 1370 

43.3716 

6 7716 

0 

0450 

HEP 

5 

lAST 1368 

43,3717 

0 3271 

0 

0451 

REP 

2 

LAST 257 

43,3720 

0 3631 

0 

0454 

REP 

22 

LAST 1370 

0067 



0455 




43.3721 

66100 

0 


SORT 


BNKQ9C 


TS 

CA 

HAaC 

BOB*© 

BZF 

TS 

CA 

mask 

AO 

TS 

CA 

BlflB© 

Biy 

TP 

CCS 

TP 

TC 

AO 

TS 

CS 

AO 

AO 

TC 

1C 


L 

SKBBP4 

ssbits 

SORT 

SR 

L 

aviM 

SR 

L 

skbbpo 

♦2 

ailSPLAY 

acEEPl 

♦2 

♦2 

S*1 

a<EBPi 

L 

a<BBPi 

S-1 

-lO»C 

NXTBNK 


20’35 OC?r. 28,1988 8ATHAP .OOT FAOB 1371 

UffilkS PAGE NO. 10 B3 S4 

BANK NUeBR BBPCXe SUPER BACK 

s SOPER BANK BITS 

BePOBE SUPER bank 
SUPBR bank necessary 


BA»C NUCER WITH SUPER BANK 

* 

* 

♦ CH -0 cwtinue with wpb check. 

♦ tw *1 GO TO DISPLAY OP SIM. 
PQRCE 9U4 TO ABSOUTIE VALUE. 


BBANK= NEwJCB 
LSlflNKCH BBCCN* 


= - BANK NLPBER 

CHECK SlM 

* CONSTANT, LAST BANK. 



ASaaCLE BBVISION 249 OP AOC PROaWM COUSSUS by KA 3 A 2021111-041 
finss UIBLE M»INT»«NCE 

aiBBOTTINE TO UFIMIB THE PHOSWM MU«BR DISPLAY CN THE DaCY. 
HS' 2 LAST 21S TO 210’ 20 20* COUNT 02/PHAffi 


20’35 OCT. 28,1968 SAUIAP .OOT PACE 1372 
U88IUS PACE NO. 1 Bo 84 


0002 

REP 

2 LAST 215 ' 

0003 

0004 

0005 

REP 

2 

LAST 215 

0000 

0007 

HEP 

306 

last 1369 

0008 

REP 307 

last 1372 

0009 

0014 

HEP 

15 

last 1306 

0015 

REP 

31 

last 1287 

0010 

HEP 

8 

last 1299 

0017 

ROOIS 

RES' 

1 

BElUHN TO 

0020 

0021 

RBP 

30B 

last 1372 

0022 

0023 

REP 

18' 

last 1372 

0024 

. REP 

2 

last 1180 

0025 

REP 

3 

LAST 244 

0020 

REP 

3 

last 1372 

0027 

0028 

0029 

R0' 

1 


0030 

BEP 

1 


0031 

0032 

REP 

25 

last 782 

0033 

REP 

14 

last 1174 

0034 

REP 

31 

last 1195 

0035 

REP 

17 

LAST 1372 

0030 

REP 

1 


0036 

REF 

1 


0037 

RBP 

26 

last 1372 


BLOQc 02 

SSILOC PPIAOl 

bank 


5243 50 002 0 SOHOOBX INDEX Q 

5244 3 0000 1 CAP o 

5245 24 002 0 INCR o 


UPDAIE MQDREO. INlRY FOB MODE IN FIXED. 


5246 55-011 1 NEUMCTEA TS MODBBO 

524T 3 5 252 1 IMJSPLAY CAP +3 

5250 22 006 1 PBEBJIMP LxCH BBANK 

5251 1 4577 1 TCP BAnkJUMP 

525 2 20344 0 CADB SETUPDSP 


entby for mcdb in a. 
DISPLAY MAJOR MODE. 
PITTS BRANK in L 
PITTS Q INTO A 


BBIUHN TO CALLER *.3 IP MOOR = THAT AT CALLER ti. OJHEIWISE RETUIW TO CALLER *2. 


525 3 5 0 002 0 CHBCkM4 INDEX O 


5254 4 0000 0 

5255 6 1011 0 

5256 0 0006 1 

5257 1 6710 0 

5260 1 6T06 1 


CS 0 

AD MtDHBO 

Extend 
BZP 0+2 

TCP 0+1 


NO MATCH 


0+2 +1 


14,3744 

10,2000 

10,2344 


bank 14 
ffiTLOC PHASETAB 

bank 


COKT 10/PHASE 


^ 1 ^ 


0038 

0039 BEP 


LAST 783 


10.2344 

10.2345 

10.2346 

10.2347 
1011 

10.2350 

10.2351 

10.2352 

10.2353 

10.2354 


0 0004 0 
52 071 0 
3 4371 0 
0 5 027 1 


03435 0 
60102 1 
52 071 0 
0 0003 1 
52 006 0 


SBlUPDSP INHINT 

DXCH RlPTREGl 
CAP PRIO 30 

TC NCVAC 

EBANK= MODRBO 
2CADR DStWJCB 


SAVE CALLER-S RETURN 2CADfl 

either a task or job can ccme to 
NEWMCBEX 


DXCH RJPTREGi 

RELINT 

DXCM Z 


0040 RHP 2 LAST 369 40,3435 

5261 


DSPMAJOB EQUALS DSaMJB 

block 02 








L IHASB »BUt MAIKIBWNCB 


20’35 OCT. 28,1968 SATRAF .DOT FAOB 13T3 
USEUS PACE NO. 2 BO 84 


0042 HBP ' 3 tASr 1372 

0043 


4000 

S261 


^nJOC FPlAOl 
BAAC 



ASS»«£iBVI3I«24»QPAa5p«X»^C0U»SU^ WSS OCT. W.1,68 SATOAP .OOT PA® 1374 


PHAffi lABLB HAIN1BW4C8 


OaShtS PA® NO. 




ic PHAaCHNO 
OOP xxxxx 




0.0 inactive, willnot permit a qrcup o bbswrp 

o ^ I ^ ® heactivatsd. 0 ®d mainly in manned FLIWTS 

restart, can cause any Ca«INATim ® wo J®S, TASKS. AND/® 

LCNCKAU^ TO BB RBSlttRlED. 

O.ODO NOT .1 A SIN®E TABLE ffiSlART, CAN CAUSE EITHER A J®, TASK, ® LCNGCALL ffiSWRT 


THIS INPWMATI® is pot into the octal «®D after TC JHASCHNO AS PCLLOPS 


HX) OOP PPP PPP 003 


™ ™ r®* '' ™ 1® fflOOP. OCTAL 1 - 7, THE p.S F® THE mASE, 

1 * T« CM * 0. IF (TIE WlSiBS TO HAvB THE IBA&B CF ORCU? O TO BB ffiT AT THTq tt?^ 


TO IHAS®Na 

OCT 00003 


THIS WILL CAUSE OTOUP 3 T®E SET TO 0 

makino grcup 3 inactive 


TC I>KAS®N0 

OCT 00012 


IE A BESIART OCCURS THIS WOXX) CAUSE 
OBCUP 2 TO ®START THE LAST DISPLAY 


TC PHASCHNO 

OCT 40084 


1C PKAgCHNO 

OCP 20135 


IC PHASCHNO 

OCT 60124 


THIS »TS THE TBASE ® GRCUP 4 AND IN 
CASK ® A restart WCULD START UP THE TVIO 
wnos LOCATED IN THE DCUBLE 4.6 RESTART 

LCCATIW 

THIS SETS LCN®ASE AND UPCN A RESTART 
OAOSES 5.13 TO BB RESTARTED CSIN® 
UHGHA® WAS SET THIS SINGLE ENTRY 
SHCUD BB A LCN®ALL) 

SIN® BOIH TaASB 4 AND IXHGBASE ARE SET, 
4.12 SH®LD CCHTAIN BOTH A TASK AND A 
L0«3CALL TO BB ^STARTED 


VARIABLE TYPE ® PHASCHNO INFCW4ATI®. INSTEAD ® THE INFWMTI® BEING IN A 
PERAANEJfT PORN, CWE STORES THE ®SIBED ®SIART INF®4ATI® IN A VARIAHkE LOCATI®. THE BITS ARE AS Fai.®S, 


TLO lAD XXX CW GOO 


^92 EA® letter ® NIMBEH STANDS F® A BIT. THE G-S STAND P® THE GRCUP, lElAL 1-7 IP THE RESTART IS TO 

R0094 ® BY WAITLIST, W IS SET TO 1 , IP IT IS A J®, J IS SETTO 1 , IP IT IS A I^NGCAU, C ISSET T^ 

BOOM THE® three BIT S MAY ® SET. X’S A® I®ORBD 1 HIST BB 1 . AND 0 .'AIST ® 0. A^IN T WsT 





20’35 OCT. 28.1988 SATBAP .007 PAGE 1375 


n 


ASS&eiK BEVIalCW 2A9 O' AOC PBOCfflAM COLOSSUS BT NASA 2021111-041 


PWSB lABlE miNlENANCE USBIWS PAOS HO. 4 M S4 

I FOR LfWGBASE THE BITS A AND D ARB CCNCEHNED WITH THB VARIABLE INFOBMATICN. IP D IS SET TO 1, ^lORIW 
OR DELTA tine WILL BB READ FRCM THB NEXT U3CATICN AFTER THE OCTAL INFOBMATICW, IP 
IS THE NAME OP A LOCATION CCMT+ININO THE INPOlWATiCN (DELTA TIME ONLY) , THEN THIS IS GIV®! AS THE 
i^T^^cS?J^^lC«^NTAINS THE DELTA Ti^«. IP THE OLD PRIORITY OR DELTA TIME IS TO B^SED, THW «H^IS 
ms VAWABIE^TOBAGE. wai D IS SET TO 0. NBXTTHE A BIT IS USED. IP IT IS SCT TO 0 M ^SS 
THAT HOULD BE I®S1AR1ED DURING A RSSTART IS WE NEXT LOCATICM AFTER WE PHASE INFOBMATIOI, WAT IS, EITHER 
^ D^INO « SKEWER D HAD BEEN SET OB NOT. IP A IS SET TO 1 . THEN THE ADDRESS WAT 

«CUU> BE RESIARIED IS Hffi ZCADB THAT IS IffiAD PRCM THE NEXT TWO LOCATICNS. EXAMPLES, 

AO TO PHASCHNO WIS WOULD CAUSE LOCATICN AD *3 TO BE 

AD*1 OCT 05023 HBSTARIED BV (StOUP THREE WITHA PRIORITY 

AD*2 ®T 23000 O' 23- NOW UPCN BETUEWING IT WOULD 

AD4.T also go To AD+3 


AO 

TO 

PHASCHNO 

AO*l 

OCT 

05023 

A0*^2 

A0«3 

OCT 

23000 

AO 

TO 

PHASCHNO 

AOtl 

OCT 

27441 

AO*2 

-OBMDR DELTI® 

AO 4.3 

AD>4 

AO*S 

2CADR 

CVALLCALL 


®0UP 1 WOULD CAUffi CAUSE CALLCALL TO 
BE started as a LCNOCALL PRCM THE TIME 
STOBH) IN LCNGBASE (LCHGBASE WAS SET) BV 
A DELTATL"® STOfffiD IN DELTI®. THE 
BaC(N CF THB 2GAOR SKCXJLD CCNTAIN THE E 
BANK OP DH-TI®. PHASCMNG RETURNS TO 
LOCATICN AD+S 


HOIE THAT IP A VARIABLE PRIORITY IS GIVEN PGR A JCB, THE JOB WILL BE RESTARTED AS A NCVAC IP THE PRICRITY IS 
NEGATIVE AS A FIND/AC IP THE PRIORITY IS POSITIVE. 

type B PHASCHNO IS A CCNBINATICN CP VARIABLE AND FIXED PHASE (RANGES. IT WILL START UP A JOB AS INDICATED 
BELOW and also SIART UP CNE FIXED RESTART. THAT IS EITHER AN 0.1 OR A O.OEO OR THE FIRST ENTRY OF O.BYEN 
double entry. THB BIT INFOBMATICN IS AS FOLLOWS, 


TLl DAP PPP PPP GOO 


KIEBB EACH LBITER OH NU«Bfl STANDS FCR A BIT. THE O’S STAND FCH THE GBCUP, OCTAL 1 - 7 . WE P’S FOR THE FIXED 
phase INF0K4ATICN OClAL 0-127 1 MJST BB 1. AND AGAIN T STANDS FOB THE TBA® AND L FCR LCNGBASE. D WIS 

TI® STANDS CNLY PRICRITY SINCE WIS WILL BE CCNSIDERSD A JOB, AND IT ®ST BE GIVEN DIREClLY IP GIVEN. 
AGAIN A STANDS FCR THE ADDRESS OP THE LOCATICN TO BE RESTARTED, 1 IP THE 2CADH IS GIVBI , OH 0 IP IT IS TO BE 
THB NEXT LOCATICN. (THE BEIUW LCCATICN OP PHASCHNO) EXA-MPLBS, 


AO 

TO 

PHASCHNO 

AD*1 

OCT 

56043 

A04^2 

OCT 

31000 

AO.^3 

2CADB 

AJCBAJCB 

A0*4 



60*5 



AD 

TO 

PHASCHNG 

ADtl 

OCT 

10015 

AD*2 




TBASE is SET A.ND ARESTART CAUSE GROUP 3 
TO START THE JOB AJOBAJCB WlW PRIORITY 
31 AND THE FIRST ENTRY OP 3.4SPOr(WE CAN 
ASSL® IT IS A TAac SINCE WE SET WASB3) 
UPCN REnUHN PRCM PHASCHNG CCNTROL WOULD 
00 TO AD+5 


UPCN A restart THB LAST DISPLAY WGAD BE 
restarted and a job WIW WE PHEViajSJY 
STORED PRIORITY WOUID BE BEajN AT AD*2 
BY MEANS OP (ROUP 5 


I 




I 
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Roisa 

ROISS 

R01S6 

HOIST 

ROISS 


20*35 OOr. 28,1968 SATOAP .OOT PAOB 1370 
USBR.S PACE NO. 5 BO S 4 


SIM^ CHOICE POR JOBS HOLDS HERB ALSO - NEGATIVE PRIORITY CAUSES A NOvAC CALL, POSITIVE A PINDVAC. 


TYPE A 
TYPE B 
TYPE C 


TLo OOP PPP PPP 000 
ILl DAP PPP PPP OOB 
lAD XXX CJsr GOO 




AS»^eL8 (eyaslOM 249 op ago PBOQBAM COUMSUS by KASA 2021111-041 20*35 OCT. 28,1988 SATRAP .DOT PAOB 13TT 


(HAJB table MAINIBUNCB 


UShiS PAOB HO. 


. . .. (Msm a® TO START UP A GROUP OR CHAHQB A ffitOUP WIIE UNDER THE CCWTROU OP A DIPRBBSIT 

nm CBDUP. P«l l!XA>IPtE, CHANGE THE PHASE OP GROUP 3 IHILB THE PORTKM CF THE PROGRAM IS IWDER JfflOJP 5. ALL 2PHStmi 
■0183 CSULS are MM3E IN THE POLL031MO MANNER, 


IC 2PH3CHNa 

OCT XXXXX 
OUT YYYYY 


HQ® Ofr KOOOC MUST BE OP TYPE A AND OCT WYW MAY BE OP EITHER TYPE A OR TYPE B OR TYPEC. THERE IS Q® 

ip LCWBASE is to be set THIS INPOtMATICN IS GIVEN W THE ODT YYYYY INPOBMATICN, IT WILL 
BE DISRBGAFDHJ IP GIVEN WITH THE OCT XXXXX INPOBMATICN. A CQJPLB OP EXAMPLES MAY HELP, 


iC JPHStSINa 

OCT 40083 
OC^ 0S02S 
OCT 18000 


SET TBAffls AND IP A iffiSTART OCCURS START 
TI« TWO aCTRIES IN 3.8 TAKE LOCATICN 
THIS IS CP TYPE C, ffiT THE JOB TO m 
TO BE LOCATICN AD+4, WITH A PRIORITY 18, 
PCR CBCUP 5 PHASE INPCBMATICN 


3 LAST 13T2 TO 13T2’ 


COUNT 02/PHA® 


(SHP 309 last 1372 


310 LAST 1377 
1 


5281 0 0004 0 

5262 SO 002 0 

5263 3 0000 1 

5264 24 002 0 

5265 54 072 0 


awscrew inhint 

NDX O 
CA 0 

INCH O 
TS T04PP2 


H* ENTRY P(» A DOUBLE PHASE CHANGE 


5286 7 4716 1 
5267 6 0000 1 
5270 54 071 0 


MASK 0CT7 
double 

TS TEMPOS 


3 LAST 1377 
1 


BBP 32 LAST 1363 
REP 3 LAST 1377 


3 0072 1 
7 4765 0 
0 0006 1 
7 4677 1 
56 072 1 


CA T04PP2 

MAaC OCn7770 

EXTEND 
MP BITT2 

XCH TBMPP2 


NEED (NLY 1770, BUT WHY GBT A NB» CONST. 


REP SO LAST 1363 
REP 1 


5276 7 4674 1 

5277 54 066 0 


MASK BIT15 
TS TBWPSW2 


GOICAIES WHETHER TO SET TBASE OB NOT 


100 LAST 1317 


BBP 157 LAST 1338 
BBP 2 LAST 1377 


5300 1 5304 1 TCP PHASCHNG +3 

5301 0 0004 0 PHASCHNG INHINT 

5302 3 4712 1 L!A CNE 

5303 54 066 0 TS 1BWPSW2 


DOICATESWE CA** FBCM A PHASCHNG ENTRY 


•198 BBP 311 LAST 1377 

0199 

0200 REP 312 LAST 1377 

0201 BBP 1 


5304 50 002 0 

5305 3 0000 1 

5306 24 OOZ 0 

5307 54 065 0 


NDX O 

CA 0 

INCH O 

TS TEMPS* 


I 
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ii 


A3SMIE aarisiw 24» op aoc pboqram colossus by NASA 2021111-041 
MASS TAatB miina«U4CE 


0202 

0203 

0204 


0205 

IBP 4T 

mot 1384 

0206 

RHP 1 


0206 

REP 1 


020T 

REP 1 


0208 

REP 32 

mot 1372 

0209 

REF 2 

Mot 1378 

0210 

REP 1 


0211 

REP 351 

Mot 1389 

0212 

RH^ 1 


0213 

RBF 1 


0214 

HEP 54 

LAST 1363 

0215 

Ha» 352 

Mot 1378 

0216 

REP 1 


0217 

REP 4 

mot 215 

0218 

HEP 1 


0219 

HSP 1 


0220 

HEP 2 

mot 1378 

0221 

REP 29 

Mot 1383 

0222 

HEP 353 

Mot 1378 

0223 

HEP 1 


0224 

HEP 313 

mot 1377 

0225 

REP 1 


0226 

REP 1 


0227 

0228 

BBP 23 

mot 1202 

0229 

RHf' 1 


0230 

REF 1 


0231 

3 

mot 1378 

0232 

0233 

RBP 1 



0234 BEE 314 MOT 1378 

0235 

0238 BBP 315 LAST 1378 

023T REP 1 

0238 


5310 0 0006 1 

5311 3 5314 1 

5312 52 006 0 


E3,1400 

5313 

5314 

5315 


02355 
20103 
22 073 


8 ) 090 } 

OCA ADRPQOJ2 
Dies 

raAMK= LSn 

ADHP(JW2 2CADR PHSCHN02 
CNEORIWO LxCH 7B«!PB8Q» 


5316 

22 006 1 


INCH 

BBANK 

5317 

22 073 0 


LXCH 

TH4peBCN 

5320 

7 4761 1 


MA9C 

OCT14000 

5321 

10 000 0 


CCS 

A 

5322 

1 5363 0 


TCP 

CHECKS 

5323 

3 0062 0 


CM 

TB4PP 

5324 

7 4704 1 


M*a< 

SITI 

5325 

10 000 0 


CCS 

A 

5328 

1 535 0 0 


rcF 

CBTPRIO 

5327 

SO 061 0 

oldprio 

NDk 

TB4PO 

5330 

3 1052 1 


CA 

EHSPRDTl 

5331 

54 070 1 


T3 

T9B*PR 

5332 

3 0062 0 

CCKi 

CA 

TR4PP 

5333 

7 4703 0 


MASK 

bitb 

5334 

10 000 0 


CCS 

A 

5335 

1 5354 1 


TCP 

CBTNEWNM 

5336 

3 0002 0 


CA 

0 

5337 

54 063 0 


TS 

T»n>fw 

5340 

3 0006 1 


CA 

BB 

5341 

0 0006 1 


extend 


5342 

04 007 1 


RCR 

SUPERa^K 

5343 

54 064 1 


TS 

TB4PB8 

5344 

3 5 347 1 

VXXH2 

CA 

(XNzADR 

5345 

22 073 0 


LXCH 

T&1PBBCN 

5346 

52 006 0 


DTC8 


5347 

02443 0 

(XK2ADR 

G»(ADR C(H2 

5350 

50 002 0 

GBTPRIO 

NDX 

0 

5351 

3 0000 1 


CM 

0 

5352 

24 002 0 


INCR 

0 

5353 

1 5331 1 


TCP 

CCNl -1 


5354 0 0006 1 GEINEWMM E)nK® 


UffilWS PAGE NO. T BO S4 
OPP TO ariTCicD hajoc 


9EE OHAT kind OP PHAS CHANGE IT IS 
IT IS OP TYPE *B’ 

»MLL WE USE THE OD PRIORITY 
NO OET A NEW PRICRITY (OR DELTA T) 

USE THE CLD PRIORITY (OR DELTA T) 

SEE IP A 2CADH IS GIVEN 


PICK UP USERS SUPEBBVWC 

back TO SWITCHH) BAJAc 

DCN’T care if DIRE(}T or INDIRECT 
LE4VE THAT DECISICN TO RESTARTS 

obtain return address 


•- 







( AS3BVLB HBVISION 249 CF AOC PBOCSW4 COUHSJS BY NASA 2021111-041 


L fHASB TABU! MAINTtNANOB 


0239 

REF 316 

WST 1378 

5355 

5 0002 0 

0240 




5356 

3 0001 0 

0241 

BH' 

2 

LAST 1378 

5357 

52 064 1 

0242 

REP 

68 

LAST 1295 

5300 

3 4711 1 

0243 

REP 317 

iAST 1379 

5361 

26 002 1 

0244 

HEP 

1 


5382 

1 5344 0 

0245 

hep 

6 

lAST 665 

4761 


0246 

REP 

13 

LAST 1335 

0061 


0247 

hep 

16 

LAST 1335 

0062 


0248 

REP 

4 

LAST 66 

0063 


0249 

PEP 

3 

LAST 66 

0064 


0250 

hep 

2 

LAST 66 

0065 


0251 

HEP 

3 

LAST 154 

0060 


0252 

REP 

27 

LAST 1372 

0070 


0253 

REP 

6 

LAST 145 

0071 


0254 

hep 

5 

LAST 1075 

0072 


0255 

REP 

5 

LAST 1075 

0073 


0256 

REP 

33 

LAST 1378 

0006 


0257 




14,3744 


0258 

HEP 

2 

LAST 1372 

10,2000 


0259 




10,2355 


0260 

, HEP 

1 


E3,1436 


0261 

HEP 

2 

LAST 1372 TO 

1377’ 

9 9* 

0262 

HEP 

4 

LAST 1378 

10,2355 

22 073 0 

0263 

REP 

2 

LAST 1377 

10,2356 

3 0065 1 

0264 

REP 

2 

LAST 1377 

10,2357 

7 4716 1 

0265 




10,2380 

6 0000 1 

0266 

REP 

5 

LAST 1378 

10,2361 

54 061 1 

0267 

RtF 

3 

LAST 1379 

10,2362 

3 0065 1 

0268 

REP 

2 

LAST 1377 

10,2363 

7 4765 0 

0269 




10,2364 

0 0006 1 

0270 

REP 

33 

LAST 1377 

10,2365 

7 4677 1 

0271 

REP 

3 

LAST 1378 

10,2366 

54 062 1 

0272 

REP 

4 

LAST 1379 

10,2367 

3 0065 1 

0273 

REP 

14 

LAST 904 

10,2370 

7 4105 0 

0274 

REP 

5 

LAST 1379 

10,2371 

56 065 1 

0275 

REP 

2 

LAST 1378 

10,2372 

7 4761 1 

0276 

REP 

354 

LAST 1378 

10,2373 

10 000 0 

0277 

REP 

1 


10,2374 

1 5315 1 


INDSX O 
DCA 0 
PXCH TBWH4 
CA TOO 

ADS O 

. TCP TaXM2 

OCTIAOOO EOUALS PRI014 
la^PO EQUALS ITtMPl 

TH4PP EQUALS nB«>2 

TSMPiW EQUALS ITBflPa 

1EMP08 equals ITEMP4 

T®n>S» EQUALS ITBMPS 

T04PSW2 equals I TBAPB 

104PPR equals HUPTBEOl 

TB>IP02 equals WJP1IE02 

Ta4pp2 equals RJPTOEOS 

T04PBBCN equals IUPTBBS4 

BB EQUALS BBA.'AC 

bank 14 

SETLOC PHA»»B 

bank 

EBANKr PHSMMEl 

COUNT lO/PHA® 

PHSCHNG2 UCCH TSMPBBCN 

CA TB1PW 

MA9C OCTT 

DOUBLE 
TS TEWO 

CA TB4P9» 

mask OCT17770 

EXTS® 

MP BIT12 

TS TB4PP 

CA 7B4PSW 

MASK CCT60000 

XCH TSMPSW 

MASK 00114000 

CCS A 

TCP QJEORIWO 


20*35 OCT. 28,1968 SATHAP .007 PAOB 1379 
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OBTAIN HBIUIW ADDRESS 


assemble REVISICK 249 OP AOC PHaSMM COLOSSUS By KASA 2021111-041 
fHASB IHBlf miNTBWNCB 




0278 

BBF 

4 LAST 1379 

10,2375 

0279 

REP 

8 LAST 1379 

' 10,2378 

0280 

REP 

2 lAST 185 

10,2377 

0281 

REE 

3 IAST 1377 

10,2400 

0282 

REP 

1 

10,2401 

0283 

0284 

REP 

4 LAST 1377 

10.2402 

10.2403 

0285 

REP 

5 IAST 1380 

10,2404 

0280 

REP 

2 LAST 1377 

10,2405 

0287 

REP 

5 LAST 215 

10,2406 

0288 

REP 

4 IAST 1380 

10,2407 

0289 

0290 

REP 

2 LAST 1380 

10.2410 

10.2411 

0291 

HEP 

19 LAST 1071 

10,2412 

0292 

REP 

3 last 1380 

10,2413 

0293 

REP 

4 LAST 385 

10,2414 

0294 

HEP 

8 LAST 1379 

10,2415 

0295 

REP 

1 

10,2416 

0298 

HEP 

1 

10,2417 

0297 

REP 

20 LAST 1380 

10,2420 

0298 

REP 

7 LAST 1380 

10,2421 

0299 

REP 

5 LAST 1380 

10,2422 

0300 

REP 

7 last 1380 

10,2423 

0301 

REP 

1 

10,2424 

0302 

REP 355 LAST 1379 

10,2425 

0303 

0304 

0305 

REP 

2 LAST 1380 

10.2426 

10.2427 
10,2430 

0308 

0307 

HEP 29 LAST 1299 

10.2431 

10.2432 

0308 

REP 

1 

10,2433 1 

0309 

REP 

5 LAST 1380 

10,2434 - 

0310 

RBP 

6 LAST 1380 

10,2435 ! 

0311 

REP 

8 last 1380 

10,2436 ; 


)- 3 0062 0 

CA 

TB4PP 

1 50 061 0 

NDK 

TB4PO 

' 54 751 0 

TS 

IHASEi 

I 10 066 0 BELOWI 

CCS 

TB4P9W2 

1 2415 1 

TCP 

BaOW2 

1 2403 0 

TCP 

♦1 

4 0072 0 

C3 

TH4PP2 

22 072 1 

UCM 

TB4PP2 

50 071 1 

NDjc 

TBIPG2 

52 751 0 

DXCM 

-PHASEl - 

10 066 0 

CCS 

Ta>n>SW2 

12 411 0 

NOOP 


1 2415 1 

TCP 

BEL0W2 

4 0025 1 

CS 

TISBi 

50 071 1 

NDY 

TEMPO2 

S5«051 0 

TS 

THASEi -2 

10 065 0 BBLair2 

CCS 

TEMPSW 

1 2431 1 

TCP 

BEIX3W3 

1 2434 1 

TCP 

BELCW4 

4 0025 1 

Cs 

TI!«i 

50 061 0 

NDx 

TEMPO 

55«051 0 

TS 

TBASEi -2 

3 0065 1 

CA 

T»4PSW 

8 2427 1 

AD 

BIT14CO4 

10 000 0 

CCS 

A 

12 427 0 

NOOP 


17777 0 BIT14CCM OCT 

17777 

1 2434 1 

TCP 

BELOW4 

0 0006 1 BEtGWS 

Ejnero 


3 0025 0 

DCA 

TI,'4B2 

53-136 0 

OXCH 

LCNfflASE 

4 0062 1 BELaW4 

Cs 

TE1PP 

50 061 0 

NDX 

TEIPG 

54 750 I 

T3 

-PHASEl -2 


20’35 OOr. 28,1968 SATRAp .007 pAOB 1380 
USR«S PAOB NO. 9 B3 84 
SBART STORINO THE PHASE INPOBMATICH 


IS IT A PHAStSlNO OR A 2PHSCMNO 
IT’S A PHASCHNO 


IT’S A 21W3CHNG 


CAN’T OBT HEHE 


SEE IF WE SHOULD SET THASE OB LatGBASE 

set loksasb only 
set neither 


ffiT THASE TO BEGIN WITH 


SHALL WE NOW SET LOJCaiASE 


***** CANT get herb 4*44=4 
44444 CANT GET HERB 44444 
NO WE NEED ONLY SET THASE 




set LCNOIASE 


and store the final part op the PHASE 


EEF 318 LAST 1379 

BEF s last 1379 


10,2437 

10.2440 

10.2441 


3 0002 0 
22 073 0 
0 0003 1 


last 1380 


10.2442 52 008 0 

10.2443 22 073 0 


CA O 

LXGH TH4PBBCN 

REI,TNT 

OTCB 

LXCH TfWPflRCN 









ill 
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031T 

0318 

0319 

BBS' 

BBP 

BBP 

6 

9 

3 

LAST 1380 
lAST 1380 
IAST 1380 

10.2444 

10.2445 

10.2446 

3 0062 0 

50 061 0 

54 751 0 

CA 

me 

TS 

TBMPP 

TBAPO 

PHASEl -2 


0320 

0321 

0322 

BBP 

Fes' 

BBP 

2 

10 

2 

lAST 13T8 
LAST 1381 
LAST 13T8 

10,2447 

10.2450 

10.2451 

3 0070 0 

50 061 0 

55<>052 0 

CA 

me 

TS 

TSMPPB 

thapo 

PHSPUm -2 


0323 

0324 

0325 

0326 

BEP 

BBP 

BEP 

3 

11 

2 

LAST 13T9 
LAST 1381 
LAST 1379 

10.2452 

10.2453 

10.2454 

10.2455 

0 0006 1 

3 0064 0 

50 061 0 

53<>43S 0 

KjTIBO 

DCA 

me 

D5(CH 

TSMPNH 

tbapo 

PHaIA^el -2 


032T 

BBP 

1 


10,2456 

1 2400 0 

TCP 

BBLGBl 


0328 

0329 

0330 

BEP 

4 

LAST 1373 

5363 

4000 

5363 


BLQCiC 02 

STLOC PPlAOl 

BAi8C 


0331 

BEP 

4 lAST 13T7 TO 

1379’ 

66 100* 

cewer 

02/phase 


0332 

0333 

0334 

BEP 

BEP 

BSP 

34 

356 

2 

LAST 1379 
LAST 1380 
LAST 1378 

5363 

5364 

5365 

T 4677 1 

10 000 0 

1 535 0 0 

HA sc 

CCS 

TCP 

BIT12 

A 

OETPBIO 

SINCE THIS IS CP TYPE B, THIS BIT SICULD 
BE HEBE IF wE ABE TO GET A NEW PBIOBITY 
IT IS, SO GET NEW PRIORITY' 

0335 

BBP 

1 


5366 

1 5327 0 

TCP 

CLDPBIO 

IT lae’T, USE THE CliJ PRIORITY 
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A 3 Sa>BLE HBVISICW 349 Qp AOC PKKKAM COLOSSUS BY KASA 2021111-041 


1- BBSXART3 HOUTINB 


•901 




•1,3520 


BANK 

A1 

•002 

REF 

2 

LAST 208 

01.2000 


sbtloc restart 

■003 




•1,3520 


bank 


0004 

HH' 

3 

IAST 1381 

B3,1436 


bbank 

= msMfei 

•005 

REF 

1 




CtXHT 

Ol/RSROU 

•008 

RBF 

868 

IAST 1338 

01,3520 

3 0181 1 

restarts ca 

MPAC *5 

•OOT 




•1.3521 

6 0000 1 

DOUBLE 

•008 

REF 

1 


01,3522 

54 155 1 

T3 

TB4P2G 

0009 

REF 

1 


01,3523 

3 3762 1 

CA 

PHS2CADR 

•010 

RBF 

1 


01,3524 

54 157 0 

TS 

TEMPSWCH 

•Oil 

REF 

1 


- 01,3525 

3 3557 0 

CA 

RTWCADH 

•012 

REF 

1 


01,3526 

54 TOT 0 

T3 

OCLCC +2 

•013 

RBF 

1 


01,3527 

3 0154 1 

CA 

TB4PPHS 

•014 

REF 

9 

cast 1364 

01.3530 

7 4744 0 

mask 

OCn 400 

•015 

REF 

35T 

IAST 1381 

01,3531 

10 000 0 

CCS 

A 

•010 

REF 

1 


01.3532 

1 3543 1 

'iCF 

ITSAVAR 

•OIT 

REF 

2 

last 1382 

01.3533 

10 154 0 

GBTPART2 C«S 

TB4PPHS 

•018 

REF 

358 

last 1382 

01.3534 

10 000 0 

CCS 

A 

•019 

REF 

1 


01.3535 

1 3643 1 

TCP 

ITSATBL 

•020 

REF 

T 

last 1379 

01,3536 

3 4781 0 

CA 

PRIO14 

0021 

REF 

31 

last 1283 

01,3537 

0 5042 1 

TC 

FINDvAC 

0022 

REF 

48 

last 1378 

B3,1400 


EBANK= 

LSn 

•023 

RBF 

1 


01,3540 

03165 0 

2CADR 

INITOSP 

0023 

REP 

1 


01,3541 

20103 1 



•024 

REF 

2 

LAST 1382 

01,3542 

0 3557 0 

TC 

RTWCADH 

•025 

REF 

10 

lASr 1382 

01,3543 

7 4744 0 

ITSAVAR MASK 

OCT1400 

0026 

REP 359 

last 1382 

01,3544 

10 000 0 

CCS 

A 

002T 

FBP 

1 


01,3545 

1 3614 0 

TCP 

ITSLIkHI 

0028 




01,3548 

0 0008 1 

EXTEND 


•029 

RBF 

2 

last 1382 

01,3547 

5 0155 0 

NDX 

■ia4P20 

0030 

R^ 

4 

LAST 1382 

01,3550 

3 1437 0 

DCA 

PHSWEi 

0031 

RBF 

2 

LAST 1382 

01.3551 

52 706 1 

PXCH 

GOLOC 

•032 

RBF 

3 

last 1382 

01,3552 

3 0154 1 

CA 

tbapphs 

0033 

RBF 

3 

last 1379 

01,3553 

7 4716 1 

MASK 

oCTr 

0034 

RBF 

3 

LAST 1228 

01,3554 

6 7715 0 

AD 

MINUS2 

0035 

RBF 360 

LAST 1382 

01,3555 

iO 000 0 

CCS 

A 

0038 

REP 

1 


01.3556 

1 3726 0 

TCP 

ITSI^IOCl- 


USBRaS PAGE NO. 1 BO S4 

OOPROO HJ3T SNITCH TO THIS EBANK 

get roOUP NIPBER -1 
SAVE FOB INDBXINQ 

XT UP EXIT IN CASE IT IS AN EvBf 

table phase 

TO SAVE T»« ASSIPE IT WILL GET NEXT 
fflKUP AFTER THIS 

IS IT A variable or table restart 
IT’S A variable restart 

IS IT an x.i restart 

NO, ITS A table restart 

IT IS AN X.I restart, THEREFORE START 
THE DISPLAY RESTART JCB 

FINIairo WITH THIS (WUP, GET NEXT »IB 
IS IT TYPE B w 
YES, IT IS TYPE B 

STORE THE JOB (OR TASK) 2CADR FOR EXIT 

SEE IF THIS IS A JOB, TASK, OR A LQNtXAL 

ITS A IXHCXJAIX, 






20’35 OCT. 28,1968 SAIEAP .007 PAOB 1383 


III 


ASSaetB PBVISICN 248 OP AOC PROCSIAM COLOSSUS By tMSA 2021111-041 


h 

rbstarts routinb 





003T 

BBP 

6 

LAST 296 

01,3557 

0 4570 1 

RTWCADB TC 

3WRETURN 

0038 

RBB 

1 


01,3560 

1 3562 1 

TCP 

itsawait 

0039 

RBP 

1 


01,3561 

1 3627 0 

TCP 

itsajob 

0040 

REP 

1 


01,3562 

3 3766 0 

itsawait ca 

WTLTCADR 

0041 

BBP 

3 

lAST 1382 

01,3563 

54 704 0 

TS 

GOLOC -1 

0042 

BBP 

3 

lAST 1382 

01,3564 

50 155 0 

1©X 

TH4P20 

0043 

BBP 

3 

LAST 1381 

01,3565 

3 1054 1 

CA 

PHSPRDTl 

0044 

BBP 

381 

lAST 1382 

01,3566 

10 000 0 

TIEBTBST CCS 

A 

0045 

BBP 

382 

LAST 1383 

01,3567 

24 000 1 

INCH 

A 

0040 

BBP 

1 


01,3570 

1 357 3 1 

TCP 

pindti>b 

004T 

BBP 

1 


01,3571 

1 5367 1 

TCP 

itsindir 

0048 

BBP 

1 


01,3572 

1 3612 0 

TCP 


80049 

***** THIS MIST be 

IN FIXED PIXHD ***** 



0050 




5367 


block 

02 

0051 

REP 

2 

LAST 622 

4000 


ffiTLOC FFTAOz 

0052 




5367 


bank 


0053 

BBP 

1 




COKT 

02/RSROU 

0054 

BBP 

4 

LAST 1383 

5387 

22 706 0 

ITSLNDIR LXCH 

GOLOC ♦! 

0055 

BBP 

2 

LAST 1378 

5370 

22 006 1 

UCCM 

BB 

0050 

BBP 

383 

LAST 1383 

5371 

50 000 1 

SDX 

A 

OOST 




5372 

3 0001 0 

CA 

1 

0058 

wap 

3 

LAST 1383 

5373 

22 006 1 

LxCH 

BB 

0059 

BBP 

S 

LAST 1383 

5374 

22 706 0 

LXCH 

GOLOC +1 

0000 

BBP 

2 

LAST 1383 

5375 

1 3573 1 

TCP 

PINDTI* 

80001 

YOU MAY RETURN TO SWllQIED FIXED ***** 


0062 




01,3573 


bank 

01 

0003 

BBP 

3 

LAST 1382 

01,2000 


SBTLOC BBSTttKT 

0004 




01,3573 

' 

bank 


0065 

REP 

2 

LAST 1382 TO 1383’ 

43 43* 

CONT 

Ol/RSRCU 

0000 




01,3573 

4 0000 0 

PINDTIME CCM 


OOOT 

BBP 

221 

LAST 1371 

01,3574 

54 001 1 

TS 

L 

0068 

BBP 

4 

LAST 1383 

01,3575 

50 155 0 

NDX 

TfWP2G 

0069 

REF 

6 

LAST 1380 

01,3576 

4 1053 1 

CS 

tbasei 

0070 




01,3577 

0 0006 1 

EXTEND 


U9SkS PACES liO. 2 
CANT GBT I«HE 

ITS A JCB 

SET UP WAITLIST CALL 


B3 



dibectly stored 

IS IT an G4CDIATS RESTART 
NO, 

BIND air WHS! IT aiOULD BEGIN 


STORED INDIBBCTLY 


IT WANTS an IM«3IATE RESTART 


GET THE correct E BANK IN CASE THIS IS 
SWITCHHJ ERRASIBLE 

GET THE TI* INDIRECTLY 
RESTORE THE B8 AND GOLOC 
PIND OUT WHEN IT SHOLD BEGIN 


make NBGITIVE SINCE IT WILL BE SUBTRACIO 
AND SAVE 




ill 
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RBSTARTS BOUriNB 


OOTl 

BEP 

21 

I^ST 1380 

00T2 

REP 

384 

1383 

00T3 

OOT4 

REP 

4 

tAST 918 

OOTS 

REP 

158 

last 13TT 

00T6 

RE® 222 

last 1383 

OOTT 

REP 

365 

last 1384 

00T8 

REP 

253 

last 1363 

OOT9 

0080 

0081 

BEP 

159 

last 1384 

0082 

BH' 

6 

last 1383 

0083 

BEP 

3 

LAST 1382 

0084 

REP 

2 

last 1382 

0085 

REP 

1 


0086 

REP 

T 

last 1384 

008T 

BEP 

4 

last 1382 

0088 

BEP 

1 

0089 

REP 

5 

last 1384 

0090 

0091 

BEP 

5 

LAST 1383 

0092 

REP 

5 

last 1382 

0093 

REP 

8 

last 1384 

0094 

REP 

6 

last 1384 

0095 

REP 

4 

last 1383 

0096 

BEP 

9 

last 1384 

009T 

0098 

BEP 

1 


0099 

BEP 

1 


0100 

BEP 

10 

tASr 1384 

0101 

BEP 

11 

last 1384 

0102 

REP 

1 



0103 BEF 12 last 13S4 

0104 

0105 HEP 13 LAST 1384 

0106 REP 45 LAST 1368 

OlOT REP 46 LAST 1384 

0108 

0109 1 


0110 

0111 


REP 

REP 


4 last 1384 
14 LAST 1384 


01,3600 

i 60 025 0 

SU 

TMl 

01,3601 

10 000 0 

CCS 

A 

01,3602 

4 0000 0 

CM 


01,3603 

6 7700 1 

AD 

0CT377T6 

01,3604 

6 4712 1 

AO 

CNB 

01,3605 

6 0001 0 

AO 

L 

01,3606 

10 000 0 

CCS 

A 

01,380T 

3 4714 1 

CA 

2^RO 

01,3610 

1 3812 0 

TCP 

*2 

01,3611 

1 3612 0 

TCP 

♦1 

01,3612 

6 4712 1 IMHTIATB AD 

(HR 

01,3813 

0 0704 1 

TC 

OCLCC -1 

01,3814 

3 3557 0 ITSLIkBB CA 

RIHNCADH 

01,3615 

54 157 0 

TS 

T»tPSWCH 

01,3610 

3 3763 0 

CA 

PRr2CADR 

01,3817 

54 707 0 

TS 

OOLOC ^.2 

01,3620 

3 0154 1 

CA 

T04PPHS 

01,3621 

7 6043 1 

HAac 

OCTITT 

01,3622 

54 154 0 

TS 

TB4PPHS 

01,3823 

0 0008 1 

EXTEND 

01,3624 

5 0155 0 

Mix 


01,3625 

3 1437 0 

OCA 

mstAiei 

01,3626 

52 706 1 

DXCH 

GCLOC 

01,3827 

50 155 0 ITSAJGB 

NDX 

1HMP2G 

01,3630 

3 1054 1 

CA 


01,3631 

54 704 0 CHCNCVAC TS 

GQLOC -1 

01,36 32 

0 0006 1 

EXTEND 

01,3633 

6 3637 0 


ITSNOVAC 

01,3834 

3 3765 0 

CAP 

pvaccadr 

01,3635 

56 704 1 

XCH 

GCLOC -1 

01,3638 

0 0704 1 

TC 

OOLOC -1 

01,3637 

3 3767 1 ITS7(VAC 

CAP 

novacadr 

01,3640 

56 704 1 

XCM 

GOLOC -1 

01,3641 

4 0000 0 

CCM 


01,3642 

0 0704 1 

TC 

OOLOC -1 

01,3643 

54 020 1 ITSATBL 

TS 

CYH 

01,3644 

10 020 1 

CCS 

CYH 

01,3645 

1 3646 1 

TCP 

♦1 

01,3646 

1 3744 1 

TCP 

ITSBVBI 

01,3647 

3 3557 0 

CA 

RIHNCADR 

01,3650 

54 707 0 

TS 

GOILC +2 


•- 

20*35 OCT. 28,1968 SAIBAP .OOT PACE 1384 
U8Ea>S PAOB NO. 3 B3 S4 


’^fP® B, SO STORE HBIURN IN 

TBfl>S«CH IN CASE OP AN Ev©! PHASE 

SET UP Exit to qbt table part op this 

VARIABLE TYPE CP IWSE 

hake the phase lock right por the table 
PART OP THIS variable PHASE 


OBTAIN THE JOB’S zCADR 


NCR ADO the PRIORITY AND LET’S GO 

SAVE PRIO UNTIL VI® SEE IP ITS 
A PINDVAC OR A NOyAC 


POSITIVE, SET UP PINDVAC CALL. 

PIQC UP PRIO, 

And go 

negative, 

set up novac cau,, 

, CORBBCT PRIO, 

AND GO 

PIND CUT IP THE PHASE IS CDO OR EVEN 
IT’S EVBI 


IN CASE THIS IS THE SECCND PART OP A 
TYPE B restart, we NEED PROPER EXIT 
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■STARTS BOUTUe 


uu 

•113 

•114 

•115 

•IIS 

•IIT 

•!!• 

• 11 * 

•IM 

•1X1 

•123 

•1X3 

•1X4 

•1X5 

•125 

•12T 

•IXS 

•txs 

•13S 

•131 

••132 

Aai33 

•134 

•135 

•130 

•13T 

■0138 

•13« 

•140 

•141 

•142 

•143 

•144 

•145 

•14« 

•14T 

•148 


8 LAST 1384 

34 LAST 13T1 

35 LAST 1385 
T LAST 1384 
1 

1 


LAST 1385 


01.3651 

01.3652 
01,3853 

01.3654 

01.3655 

01.3656 

01,36ST 

01.3660 

01.3661 


3 0154 
54 021 
6 0021 
50 155 
6 2001 
54 150 


CA 

TS 

AD 

AD 

TS 


TBLPPHS 

SR 

SR 

TSMP2C3 
SI2ETAB +1 
POINTER 


0 0006 1 
5 0156 0 
3 2002 1 


CCNTBI,2 


EJOB© 

NDY POINTER 
DCA CAIWIAB 


■S' 

15 

LAST 1384 

01,3662 

22 706 

0 

lkcm 

GOLOC «i 

KP 

368 

LAST 1384 

01,3663 

10 000 

0 

CCS 

A 

BBF 

3ST 

LAST 1385 

01,3864 

24 000 

1 

INCR 

A 

SBF 

1 


01,3665 

1 3740 

0 

TCF 

ITSAJCB2 

BBF 388 

LAST 1385 

01,3666 

24 000 

1 

INCR 

A 

■P 

16 

LAST 1385 

01,366T 

54 705 

i 

TS 

OOLOC 

aep 

2 

LAST 1383 

01,36T0 

3 3768 

0 

CA 

WILICADR 

REF 

IT 

LAST 1385 

01,3671 

54 704 

0 

TS 

GOLOC —1 

BBF 

' 18 

LAST 1385 

01,3672 

3 0706 

0 

CA 

GOLOC +1 

BBF 

38 

LAST 1363 

01,3673 

7 4701 

1 

MASK 

BITlO 

BBF 389 

LAST 1385 

01,3674 

10 000 

0 

CCS 

A 

BBF 

1 


01,3675 

1 37 33 

1 

TCP 

ITSWTLST 

BBF 

3 

LAST 1385 

01,3876 

50 156 

0 

NDX 

POINTER 

BBP 

1 


01,3677 

3 2000 

0 

CA 

PHDTDAB 

■BK 

1 


01,3700 

1 5378 

1 

TCP 

ITSLGCLl 

♦♦*44 THIS HIST BE 

IN FIXSJ FIXED 4444* 






5376 



block 

02 

BBF 

3 

LAST 1383 

4000 



®1IXX; FFTAG2 




5376 



BANK 


BEF 

2 

LAST 1383 TO 1383’ 

7 

7* 

COUNT 

02 /RSflaj 

BBF 

19 

LAST 1385 

5376 

22 706 

0 

ITSLGCLl LXCH 

GOLOC +1 

BBF 

4 

LAST 1383 

5377 

22 006 

1 

LXCH 

BB 

BBF 

20 

LAST 1385 

5400 

22 706 

0 

LXCM 

GOLOC +1 




5401 

0 0006 

1 

EXTB® 


BEF 

370 

LAST 1385 

5402 

5 0000 

1 

NDX 

A 




5403 

3 0001 

0 

DCA 

0 


USBR.S FACS NO. 4 B3 S4 

«r UP POINTER FOR FINDING OUR PIACE IN 
RB RESTART TABLES 


FDO OUT RHAT’S IN THE TABLE 

GET THE 2CADR 

STORE THE BB INFOBMATICH 

IS IT A JCB OR IS IT TIbBD 
POSITIVE, MIST BE A JCB 


MUST BE EITHER A WAITLIST OR LCNOCALL 
LBT-S STORE THE CJORHECT CADR 

»r UP (XJR EXIT TO WAITLIST 


NOW FIND OUT IF IT IS A WAITLIST CALL 
THIS SHOULD BE ONE IF WE HAVE -BB 
FC» THAT MATTER SO SIOULD BE BITS 9,8,T, 
6,5, AND LAST BUT NOT LEAST CPEmAPS NOT 
IN IMPORTANCE ANYWAY. BIT 4 
IT IS A WAITLIST CALL 

obtaln the (juginal delta T 
ADDHESS fob THIS LCNOCALL 

NOW GO (SET THE DEI,TA TIME 


obtain the correct b bank 
AI® preserve cur B and F BA.VKS 
GET THE Dra.TA TIME 
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aeSIMRTS ROUriNB 


0149 

B8P 

21 LAST 1385 

5404 

22 706 0 

LXCH OQLOC >1 

OISO 


5 lAST 1385 

5405 

22 006 1 

LxCH B8 

•151 

H3P 

22 LAST 1388 

5406 

22 706 0 

LxCH OOLOC ♦! 

•152 

AH' 

1 

5407 

1 3701 0 

TCP ITSLOCL2 

B0153 

***** *DU 141Y REHJRN TO SWITCHED FIXED ***** 

0154 

•155 

REP 

4 LAST 1383 

01,3701 

01,2000 


bank 01 
setloc restart 

0156 

•157 

REP 

01,3701 

3 east 1383 TO 1385’ 

BAJOC 

TO 113* COUNT Ol/RSHCU 

0158 

REP 

• lAST 1204 

01,3701 

530140 1 

ITSLOCLz OxCH LOKJTIf® 

•159 

0160 

RES' 

30 LAST 1380 

01.3702 

01.3703 

0 0006 1 

4 0025 1 

BXTfiND 

DCS TIMBa 

0161 

RES' 

7 LAST 1386 

01,3704 

210140 1 

DAS LCNOTIi* 

0162 

RES' 


01,3705 

0 0006 1 

BXTBTO 

0163 

2 LAST 1380 

01,3706 

3 1138 1 

DCA LCMGRAW 

0164 

HEP 

8 last 1386 

01,3707 

210140 1 

DAS LCNGTIMB 

0165 

RBF 

• last 1388 

01,3710 

110137 1 

CCS LQ40TE* 

0166 

HEP 

1 

01,3711 

1 3721 1 

TCP LCHGCLCL 

0167. 

0168 

REP 

2 LAST 1383 

01.3712 

01.3713 

1 3714 1 

1 3807 1 

TCP *2 

TCP B«D1ATE -3 

0169 

REF 

10 LAST 1386 

01,3714 

11«140 1 

CCS UMOTIi* +1 

0170 

REF 

2 lAST 1386 

01,3715 

1 3721 1 

TCP LCNGCLCL 

0171 

0172 

RBF 

3 LAST 1386 

01.3716 

01.3717 

13 717 1 

1 36 07 1 

NOOP 

TCP mediate -3 

0173 

HE5F 

4 LAST 1386 

01,3720 

1 3612 0 

TCP BEDIATE 

0174 

HEP 

1 

01,3721 

3 3764 1 

LCHGCLCL CA LOCLCADR 

0175 

RES' 

23 LAST 1386 

01,3722 

54 704 0 

TS GQLOC -1 

0176 

0177 

RES' 

11 LAST 1386 

01.3723 

01.3724 

0 0006 1 

3 1140 0 

EXTEND 

DCA LCHGTI/E 

•178 

REF 

24 LAST 1386 

01,3725 

0 0704 1 

TC OCLOC -1 

0179 

BHE 

3 last 1385 

01,3726 

3 3766 0 

ITSLNGCL CA WTLTCADR 

0180 

HEP 

25 lAST 1386 

01,3727 

54 704 0 

TS GCLOC -1 

0181 

REP 

• LAST 1385 

01,3730 

50 155 0 

NDx THWPzG 

0182- 

HEP 

5 LAST 1384 

01,3731 

4 1054 0 

CS PHSPHDTT 

0183 

HEP 

2 lAST 1385 

01,3732 

1 5376 1 

TCP ITSLGCLi 

0184 

ref 

26 LAST 1386 

01,3733 

4 0708 1 

ITSWTLST CS Gaxc 

0185 

REP 

27 LAST 1386 

01,3734 

54 706 1 

TS oaix: ♦! 




20’35 OCT. 28,1908 SATRAP .OOT PAGE 1386 

USSUS PAOB NO. 5 E3 S4 

RBSTORB OUR E AND P BANK 
HESTORS T* macs E AND P BANKS 
AND PRESERVE OUR L 

NO» LET’S PROCESS THIS LONOCALL 


CALCULATE TI* LEFT 


FIND CUT HOW THIS WOULD BE RESTARTED 


CAN’T get herb 


WE WTti. GO TO IXKGCALL 
prepare our bokt to LCHGCALL 

ASSUME IT WILL GO TO WAITLIST 

get the delta t address 
now get the delta ti.ab 

CORRECT THE RBCW INFOBMITICN 




20’35 OCT. 28,1968 SATRAP .007 PAGE 1387 




( 


ASSE^eLE BBVISIOK 249 OP AOC PflOOBAM COUMSUS BY NASA 2021111-041 
BBSTART3 ROUTINB 


0186 

REF 

4 

LAST 1385 

01,3735 

0187 

REF 

2 

LAST 1385 

01,3736 

0188 

REP 

1 


01.3737 

0189 

REF 

28 

LAST 1386 

01,3740 

0190 

REF 

5 

lAST 1387 

01,3741 

0191 

REF 

3 

LAST 1387 

01,3742 

0192 

REF 

1 


01,3743 

0193 

HBP 

3 

LAST 1384 

01.3744 

0194 

REF 

29 

LAST 1387 

01,3745 

0195 

REF 

9 

LAST 1386 

01,3746 

0196 

REF 

2 

LAST 1385 

01,3747 

0197 

REF 

7 

LAST 1385 

01,3750 

0198 

REF 

8 

LAST 1387 

01,3751 

0199 

REP 

9 

LAST 1387 

01,3752 

0200 

REF 

6 

LAST 1387 

01,3753 

0201 

REF 

1 


01,3754 

0202 

REP 

46 

LAST 1363 

01,3755 

0203 

REP 

7 

LAST 1387 

01,3756 

0204 

REP 

■ 5 

LAST 1384 

01,3757 

0205 

REF 

30 

LAST 1387 

01,3760 

A0206 

0207 

REF 

2 

LAST 1387 

01,3781 

.0208 

REF 

669 

LAST 1382 

0154 

0209 

REP 

670 

LAST 1387 

0155 

0210 

REP 

671 

LAST 1387 

0156 

0211 

REP 

672 

LAST 1387 

0157 

0212 

REP 

1 


0705 

0213 

REP 

7 

LAST 1364 

7715 

0214 

REP 

9 

LAST 1185 

6043 

0215 

REP 

1 


01,3762 

0216 

REP 

1 


01,3763 

0217 

REP 

4 

LAST 1284 

01,3764 

0218 

REP 

32 

LAST 1382 

01,3765 

0219 

REP 

52 

LAST 1205 

01,3768 

0220 

REP 

32 

LAST 1372 

61,3767 


50 156 0 

NDX 

POINTER 

3 2000 0 

CA 

PHDTIAB 

1 3566 0 

TCP 

TMBTBST 

56 705 0 

IT3AJ0B2 XCH 

GOLOC 

50 156 0 

NDX 

POINTER 

3 2000 0 

CA 

PfflJTlAB 

1 3631 1 

Tty 

CrtOICVAC 

3 0157 1 

ITSEVEN CA 

TEMPSWCH 

54 707 0 

T3 

GOLOC +2 

50 155 0 

NDX 

TH4P20 

3 2000 0 

CA 

SIZETAB 

6 0154 1 

AD 

TB4PPHS 

6 0154 1 

JID ' 

TB4PPHS 

6 0154 1 

AD 

TB4PPHS 

54 156 1 

TS 

pointer 

1 3857 1 

TCP 

CCNTBL2 

3 6214 0 

PHSPAHT2 CA 

THRffi 

26 156 1 

ADS 

POINTER 

3 3557 0 

CA 

rtwicadb 

54 707 0 

TS 

GOLOC +2 

1 3857 1 

TCP 

CCNTBL2 


TEMPPHS EOJALS 

; MPAC 


TEMP20 equals MPAC +i 


POINTER equals HPAC +2 


TEMPSWCH equals MPAC +3 


GOLOC EQUALS VAC5 *200 


MINUS2 equals NEG 2 


OCT1T7 equals LOwt 

03755 0 

PHS2CADB CaiNADB PHSPARTZ 

035 3 3 1 

PBT2CADB GENADB GETPAHT2 

05231 1 

LGCLCADB GENADR LCNGCALL 

05042 1 

FVACCADR CaENADB PINDvAC 

05140 1 

WTLTCADR GENADR WAITLIST 

05027 1 

NOvACADB GENADR NOvAC 


USBIW3 PAGE NO. 8 B3 S4 

GET THE DT AND FIND OtrT IF IT WAS STORED 
DIHECUiY OB INDIRBCM1.Y 

FIND OUT HOW THE TIME IS STORED 

STORE THE CADB 

AEO THE PRIORITY AND LET’S 00 


SET UP for EITHER’ the SECXHD PART OP THE 
■BIBLE, OB A RETUiei FOR THE NEXT GROUP 

ffiT UP POINTER FOR OUR LOCATION WITHIN 

the table 

THIS MAY LOCK HAD BUT LET’S ffiB YOU DO 
BBTIER IN TIi« OR NIPBBRR OP LOCATIONS 


NOW PROCESS what IS IN THE TABLE 
SET THE POINTER FOB THE SECOND HALF OP 

the table 

THIS WILL BE CUB LAST TIjfi THROUOI THE 
EVEN table , SO AFTER IT GET THE NEXT 
lacup 

so LET’S get the SECOND HNTRY IN THE TBL 
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D*J MDB SWITCMINO BOUTINES 


BLOQC 02 
SETLOC PPTAOa 

bank 


•001 




5410 


•002 

BBP 

1 


4000 


•003 




5410 


•004 

HEP 

1 


83,1471 


■0005 



§ 

i 

ROUTINES 

. 

0006 

hep 

1 




•007 

BESP 254 

WST 1384 

5410 

3 4714 

•008 

HEP 

29 

LAST 1333 

5411 

54 032 

0009 

HEP 

IT 

WST 1333 

5412 

54 033 

•010 

HH' 

23 

LAST 1334 

5413 

54 034 

0011 

HEP 

319 

last 1380 

5414 

0 0002 

•012 

HEP 

33 

last 1383 

4702 



eBAi4C= COMWD 


COlKr 02/WCI* 


2EROICDU CAP 
T3 
T3 
TS 
1C 

SPSCOOe 


®RO 

axiK 

onuy 

couz 

o 

BIT9 



20’35 oor. 28,196B SATRAP .007 PACE 1388 
US8R<S PACE NO. 1 Bo S4 


ZgBO ICJXJ COtNIEHS. 
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20*35 OPT. 28,1968 SATSAP .OOT PAGE 1389 
U9SB-S PACE NO. 2 E3 S4 


P0013 


DW JfSniNO ROOriNB. 


0014 




11,3121 


0015 


1 


01,2000 


0010 




01,2516 


OOIT 

MB' 

1 




0018 




01,2516 

0 0004 0 

0010 

BEP 

41 

usr 382 

01,2511 

4 1036 1 

0020 

KP 

4 

LAST 180 

01,2520 

7 4726 1 

0021 

BEP 

3T1 

LAST 1385 

01,2521 

10 000 0 

0022 

WP 

1 


01,2522 

1 2526 0 

0023 

■S' 

3T 

LAST 1328 

01,2523 

0 5537 0 

0024 




01,2524 

00206 0 

0025 

EBP 

1 


01,2525 

1 346 1 0 

0032 

BBP 

2 

LAST 1389 

01,2526 

0 3455 0 

R0033 





DO ALL 

0034 

HP 

29 

[AST 1034 

01,2527 

4 1321 1 

0035 

BBP 

2 

LAST 528 

07,2530 

1 4730 0 

0030 

BBP 

30 

LAST 1389 

07,2531 

27«321 1 

003T 

HP 

43 

LAST 121 

07,2532 

4 1320 0 

0038 

HP 

1 


07,2533 

7 5656 0 

0030 

BBP 

44 

LAST 1389 

07,2534 

27«320 0 

0040 

BBP 

.5 

LAST 1389 

07,2535 

4 4726 1 

0041 




07,2538 

0 0006 1 

0042 

BBP 

3T 

LAST 983 

07,2537 

03 012 1 

0043 

BBP 

3 

LAST 140 

07,2540 

0 3070 0 

0044 

BBP 

40 

LAST 1383 

07,2541 

3 4706 1 

0045 




07,2542 

0 0006 1 

0040 

BBP 

38 

LAST 1389 

07,2543 

05 012 1 

00461 

BBP 

3 

LAST 140 

07,2544 

0 5410 1 

004T 

BBP 

45 

LAST 1383 

07,2545 

3 4705 1 

0048 

BBP 

53 

LAST 1381 

07,2546 

0 5140 1 

0049 

BEP 

5 

LAST 183 

E3,1474 


0050 

BBP 

1 


07,2547 

02561 1 

0050 

KBP 

1 


07,2550 

16103 1 

0051 

BBP 

45 

LAST 1389 

07,2551 

4 1320 0 

0052 

BEP 

34 

LAST 1388 

07,255 2 

7 4702 1 

0053 

BBP 

3T2 

LAST 1389 

07,255 3 

10 000 0 

0054 

BBP 

1 


07,2554 

1 2557 0 


BAKC 11 
teiLoc meat 
BAW 

COUNT OT/WCDE 


n*J2ERO M«NT 
Cs 
MAac 
CCS 
TCP 


IC 

OPT 

ICP 

Ii»U2J?BCW iC 

iHB woac. 

CS 

MASK 

ADS 

CS 

MASK 

ADS 

CS 

EjCIBro 

kand 

1C 

CAP 

EXIB® 

WOB 


DSPTAB ♦ilD 
BITS4<IS 

A 

MJZBHOA 

ALAIM 

00206 

CACBTSTJ +4 

CAGETSTJ 

IMCDeS33 

SUPBROII 

IMa)eS33 

MOWSSO 

BITS3d4 

IMCDGSaO 

BITS4d6 

CHAN12 

NCMTTOPP 

BITS 

CHAN12 


ic zeroicdu 
CAP BIT6 
IC WAITUIST 
EBANK= CDuIND 
2CADR I!*JZEB02 


CS 

MAac 

(XJS 

TCP 


iMOoesso 

BIT9 

A 

MCBEEXIT 


HDirrlNB TO ZERO IC3XJS. 

DCNT ZERO CDUS IP MJ IN OIMBAL LOCK AND 
CQAR^ ALICE (QINBAL RUNAWAY PROIECTION) 


IP SO. 


M-HIIAIE PAILURB. 


DISABLE DAP AUTO AND HOD MODBS 
bits for GROUND 


inhibit icdupail and imjfail tiN case we 

JUST CAME ctrr OP COARSE ALIGN) . 


ffiND ZERO ENCODE WITH CCMHSE AND ERROR 
CCUNTER DISABLED. 


lUIW CPF NO ATT lAMP. 


WAIT 320 MS TO GIVE AGS ADEQUATE TIME TO 
RECEIVE ITS PULSE TRAIN. 


SEE IF IMJ OPERATING AND AIAIW IF NOT. 



il 
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20*35 OCT. 28,1968 SATRAP .pOT PACE 13J0 
USBaS PACE NO. 3 *3 S4 


0055 

0056 

REP 

38 

1389 

07.2555 

07.2556 

0 5537 0 
00210 1 

1C 

OCT 

ALAIM 

210 


005T 

0058 

0059 
0061 

REP 

REP 

REP 

T 

1 

4 

lAST 1383 

LAST 1389 

07.2557 

07.2560 

07.2561 

07.2562 

0 0003 1 

1 4570 0 

0 3443 1 

0 5410 1 

MQDEEXIT Ba,TNT 

TCP aneiuRN 

IMUZEROa 1 C CACBIEST 

ic fflHOICDU 

1 »®RAL MCDE-arllChINO EXIT. 

2®«) OXK, CJX/Y, CDOZ 

0082 

0063 

0064 

REP 

HEP 

41 

39 

I^ST 1389 

WST 1389 

07.2563 

07.2564 

07.2565 

4 4706 0 

0 0006 1 
03 012 1 

Cs bits 

extend 

hand CMANi 2 

HB4CX/E zero DISCRETE. 

0065 

0066 

HEP 

REP 

36 

4 

last 1363 

cast 159 

07,2560 

07,2567 

3 4700 1 

0 5161 1 

CAP 

TC 

BITll 

VARDELAY 

wait 10 SECS PCR CTR3 TO PIND OI>BALS 

006T 

0069 

OOTO 

OOTl 

HEP 

REP 

HEP 

REP 

2 

2 

46 

47 

last 1390 

last 1389 

last 1389 

LAST 1390 

07.2570 

07.2571 

07.2572 

07.2573 

0 3443 1 

4 5656 0 

7 1320 0 
S5«320 0 

IMUZERO 3 1 C 

cs 

mask 

T3 

CACETEST 

BITS3d4 

IMCDES 30 

IMQDBS30 

HH4CX/E IHJPAIL AND ICDUPAIL INHIBIT. 

OOT2 

00T3 

00T4 

REP 

HEP 

REP 

3 

31 

32 

last 1389 
last 1389 

last 1390 

07.2574 

07.2575 

07.2576 

4 4730 0 

7 1321 1 
55.321 1 

Cs 

MAaC 

T3 

SUPEHoil 

IMCDES 33 

IMQDeS33 

BtAaE DAP Airro and hold modes 
bits for ground 

00T5 

0076 

RS' 

REP 

39 

5 

last 1080 

last 154 

07,2577 

07,2600 

0 4633 0 
14665 1 

1C 

CADR 

IBNKCALL 

SETISSW 

set ISS warning if either op ABCVB ABE 
PRESBIT. 

OOTT 

REP 

1 


07,2601 

1 3433 1 

TCP 

H®I!4U 
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III 

L DtJ MCDB SWIlOHlNO BtXrriNES USBB-S PAGE NO. 4 *3 34 


FOOTS M) coarse ALICE MCDB. 


SOTS 





07,2602 

SOSO 

REF 

3 

LAST 

1389 

07,2603 

SOSl 

REF 

3 

LAST 

183 

07,2604 

00S2 

REP 

41 

LAST 

1364 

07,2605 

0083 

REF 

54 

LAST 

1389 

07,2606 

eos4 

EBP 

6 

LAST 

1389 

E3,1474 

00S5 

REP 

1 



07,2607 

00S5 

REP 

1 



07,2610 

SOSO 

REF 

2 

LAST 

1389 

07,2611 

OOST 

REF 

3 

LAST 

1390 

07,2612 

6088 

REP 

46 

LAST 

1389 

07,2613 

0089 





07,2614 

0090 

REF 

40 

LAST 

1390 

07,2615 

0091 

REF 

69 

LAST 

1379 

07,2616 

0092 

RSF 

T 

LAST 

1391 

07,2617 

0093 

REP 

8 

LAST 

1391 

07,2620 

0094 

REF 

21 

LAST 

1328 

07,2621 

0095 





07,2622 

0090 

REF 

9 

LAST 

1391 

07,2623 

0097 

REF 

30 

LAST 

1388 

07,2624 

0098 





07,2625 

0099 

REF 

45 

LAST 

1363 

07,2626 

0100 

REF 

223 

LAST 

1384 

07,2627 

0101 





07,2630 

0102 

HEP 

14 

LAST 

1379 

07,2631 

0103 





07,2632 

0104 

REF 224 

lAST 

1391 

07,2633 

0105 

REF 

10 

LAST 

1391 

07,2634 

0106 

REF 

2 

LAST 

1388 

07,2635 

OlOT 

REF 

11 

LAST 

1391 

07,2636 

0108 

REP 

1 



07,2637 

0109 

HEP 

TO 

LAST 

1391 

07 , 2640 

0110 

REF 

5 

LAST 

1390 

07,2641 


0 0004 

0 

IMUCCMRS 

IfWINT 


0 3455 

0 


TC 

CAOBTSTJ 

0 2746 

0 


TC 

setcqars 

3 6211 

0 


CAF 

SIX 

0 5140 

1 


TC 

WAITLIST 




EBANK= 

QDUIND 

02612 

0 


2CADB 

COIRS 

16103 

1 




1 2557 

0 


TCP 

MCDEEXIT 

0 3443 

1 

CCMRS 

TC 

CAGETEST 

3 4705 

1 


CAF 

bits 

0 0006 

1 


Extend 


05 012 

1 


WOR 

CHAN12 

3 4711 

i 


CAF 

TWO 

55«474 

0 

CCMRSl 

TS 

CDUIND 

51«474 

1 


INDEX 

CDUIND 

3 1155 

1 


CA 

THETAD 

0 0006 

1 


EXTEND 


5 1474 

1 


INDEX 

CDUIND 

20 032 

1 


M3U 

CDUX 

0 0006 

1 


EXTBID 


7 4676 

0 


MP 

BIT13 

56 001 

0 


XCH 

L 

6 0000 

1 


double 


54 061 

1 


TS 

ITHMPl 

1 2634 

0 


TCF 

*2 

26 001 

1 


AOS 

L 

51«474 

1 


INDEX 

CDUIND 

23«471 

1 


LXCH 

CCM4AND 

11«474 

0 


CCS 

CDUIND 

0 2817 

0 


TC 

CQARSl 

3 4711 

1 


CAF 

TWO 

0 5161 

1 


TC 

VARDKAY 


ENABLE ALL THREE ISS CDU ERRCR COUNTERS 

®T CDU INDICATOR 

CCMPUIE THBTAD - THBTAA IN I’S 
CCMPLB«NT FORM 

9IIPT RiaiT 2 
ROUND 

DIFFERENCE TO BE CCMPUTED 

MINIMUM OF 4 MS WAIT 



I 
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L 

MU MODE SWITCHiNa 

0111 

HEP 

4 

tAsr 1391 

0112 

REP 

15 

LAST 1391 

0113 

HEP 

T1 

LAST 1391 

0114 

REP 

12 

last 1391 

0115 

HEP 

13 

last 1392 

0116 

HEP 

3 

last 1391 

0117 

HEP 

1 


0118 

HEP 

1 


0119 

REP 

1 


0120 

REP 

2 

last 1392 

0121 

HEP 

1 


0122 




0123 

REP 

1 


0124 

HEP 

14 

LAST 1392 

0125 

REP 

4 

LAST 1392 

0126 

REP 

1 


0127 

HEP 

10 

last 1392 

0128 

REP 

16 

last 1384 

0129 

HEP 

IS 

last 1392 

0130 

REP 

4 

last ■ 983 


07.2644 

07.2645 

07.2646 

07.2647 

07.2650 

07.2651 

07.2652 

07.2653 

07.2654 

07.2655 

07.2656 

07.2657 

07.2660 

07.2661 

07.2662 

07.2663 

07.2664 

07.2665 


0131 

REP 

16 

LAST 1392 

07,2666 

0132 

HEP 

1 


07,2667 

0133 

REP 

17 

last 1392 

07,2670 

0134 

REP 

1 


07,2671 

0135 

0136 

REP 

13 

LAST 781 

07,2672 

07,2873 

0137 

REP 

72 

last 1392 

07,2674 

0138 

REP 

18 

last 1392 

07,2675 

0139 

REP 

373 

last 1389 

07,2676 

0140 

0141 

REP 

31 

last 1391 

07,2677 

07,2700 

0142 

REP 

19 

last 1392 

07,2701 

0143 

REP 

22 

last 1391 

07,2702 

0144 

REP 

374 

last 1392 

07,2703 

0145 

REP 

1 


07,2704 

0146 

REP 

1 


07,2705 

0147 

REP 

2 

last 1392 

07,2706 


: 0 3443 1 

CQAHS2 

1C 

CAOSlESr 

1 54 061 1 


IS 

iiawpi 

3 4711 1 


CAP 

TWO 

55«474 0 

♦3 

TS 

CDUIND 

51-474 1 


WDEX CDUIND 

11-471 0 


OC3 

Ca«4AND 

0 2854 1 


1C 

CCMPOS 

0 286 3 0 


1C 

NEXTCDU ♦! 

0 2721 1 


1C 

CCM4EO 

0 2663 0 


IC 

NExTOXJ ♦! 

6 3544 1 

COWPCS 

AD 

-COMAX 

0 0006 1 


EXTB® 

8 2731 0 


BZ4P 

CCM®RO 

51-474 1 


INDEX 

CDUIND 

55-471 0 


TS 

COMAND 

4 3545 1 


C3 

-COMAX- 

24 081 0 

NExiaXJ 

INCH 

ITEMPl 

6 4713 0 


AD 

NBOo 

51-474 1 


index 

CDUIND 

54 050 0 


TS 

CDUXO® 

11-474 0 


CCS 

CDUIND 

0 2645 1 


IC 

COAHS2 *3 

10 061 1 


CCS 

I1B4P1 

1 2735 0 


ICP 

ajropuLs 

0 5156 0 


IC 

pixdelay 

00226 1 


DEC 

150 

3 4711 1 


CAP 

TWO 

54 061 1 

CHcCORS 

TS 

IlSMPl 

50 000 1 


INDEX 

A 

3 0032 0 


CA 

ODUX 

0 0006 1 


BXIB® 


5 0061 0 


INDEX 

iTtMPl 

21-155 0 


MSU 

THEIAD 

10 000 0 


CCS 

A 

1 2712 0 


TCP 

COARSERH 

1 2707 1 


TCP 

C0RSCHC2 

1 2712 0 


TCP 

COARSERH 


20*35 OCT. 28,1968 SATEWP .007 PACE 1392 
USBRaS PACE NO. 5 E3 S4 
DCHT CCNTINIE IP CACBD. 

sets to +0. 

SET CDO INDICATOR 


CP PULSES REOUIRED 
(SttSAlBR THAN Mix ALLOWED 


COMAX = MAX NUMffiR OP PULffiS ALLOWED 
MINUS CNE 


HHXXIE CCM4AND BY MAX NIWBER OP PULSES 
ALLOWED 


»r UP COMAND HEOISTER. 


SEE IP ANY PULSES TO GO OUT, 


wait POR OIMRALS TO SETTLE. 

At E4D OP CCM4AND, CHEQc TO SEE THAT 
OD«ALS Are within 2 degrees op thetad. 
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mu MODE SWIlCHINO HDUTINBS 


ei48 

REP 

20 

LAST 

1392 

0T.2T0T 

•149 

REP 

1 



0T,2T10 

•150 

HEP 

2 

LAST 

1390 

0T.2T11 

•151 

REP 

1 



0T.2T12 

•152 





0T,2T13 

•153 

REP 

2 

LAST 

1392 

6T,2T14 

•154 

REP 

39 

LAST 

1390 

0T,2T1S 

•155 





0T.2T18 

•156 

REP 

2 

LAST 

139 

0T,2T1T 

•15T 





or. 2120 

•15« 

HEP 

2 

LAST 

1392 

0T,2T21 

•159 





0T.2T22 

•ISO 

REP 

2 

LAST 

1392 

0T,2T23 

•181 





0T.2T24 

•162 

HEP 

IT 

LAST 

1392 

0T,2T2S 

0183 

REP 

5 

LAST 

1392- 

0T,2T26 

•184 

HEP 

2 

LAST 

1392 

0T,2T2T 

•185 

HEP 

3 

LAST 

1392 

0T,2T30 

•188 

REP 

2SS 

LAST 

1388 

0T,2T31 

•16T 

REP 

18 

LAST 

1393 

0T,2T32 

•168 

HEP 

6 

LAST 

1393 

0T,2T33 

0189 

HEP- 

4 

lAST 

1393 

0T,2T34 

OITO 

HH' 

8 

LAST 

103T 

0T,2T35 

•ITl 





01,2138 

•1T2 

REP 

12 

LAST 

983 

0T,2T3T 

•1T3 

REP 

1 



0T,2T40 

•1T4 

REP 

2 

LAST 

1392 

0T,2T41 

•1T5 

eep 

4T 

LAST 

1391 

0T,2T42 

•ITS 





01,2743 

•ITT 

REP 

41 

LAST 

1391 

01,2144 

•ITS 

REP 

85 

LAST 

1283 

01,2145 


10 061 

1 

caR5a9C2 

CCS 

ITEMPl 

1 2615 

0 


TCP 

CHtCORS 

1 3433 

1 


TCP 

ENDIMU 

6 2120 

Q 

cchrserr 

AO 

COAHSTOL 

0 0006 

1 


ecHs® 


8 2101 

0 


B2HP 

C0RSCHC2 

0 5531 

0 


TC 

ALAIM 

00211 

0 


CCT 

211 

1 3441 

1 


TCP 

MJBAD 

11511 

1 

COARSTOL 

DEC 

-.01111 

6 3544 

1 

CO-NEG 

AO 

-CCM4AX 

0 0006 

1 


BXTO® 


6 2131 

0 


BZ4P 

CCMZERO 

4 0000 

0 


CCM 


51«4T4 

1 


INDEX 

CDUIND 

55«4T1 

0 


TS 

CCM4AND 

3 3545 

0 


CA 

-COMAX- 

0 2662 

1 


TC 

NEXTCJXJ 

3 4114 

1 

CCMZEHO 

CAP 

ZERO 

51«4T4 

1 


INDEX 

CDUiND 

5T«4T1 

1 


XCH 

COWAND 

0 286 2 

1 


TC 

NExTODU 

3 HOT 

0 

ffiNDPULS 

CAP 

13,14,15 

0 0006 

1 


Exrero 


05 014 

1 


WCR 

CHAN14 

3 3546 

0 


CAP 

600MS 

1 2641 

1 


TCP 

COAPS2 -1 

3 4105 

1 

CA*sce 

CAP 

BITS 

0 0006 

1 


EXTEND 


05 012 

1 


•OR 

CHAN12 

0 5213 

1 


TC 

TASCOVER 


20*35 OCT. 28,1968 SATHAP .OOT PAOB 1393 
USB.S PAOB NO. 6 E3 S4 

(MD OP coarse ALIGM4arr. ' 

2 DBoiees. 

CQARSS ALIGN ERROR. 

2 DEGREES SCALED AT HALP-ffiVOLOTICNS 


THEN TO VAHDELAy 

BMBLE ALL THREE ISS CDU ERROR COUNTERS 
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20’35 OCT. 28,1968 SATHAP .OOT PACE 1394 



L 


OlTt 

0160 

HP 

41 

l^ST 1363 

07.2746 

07.2747 

0181 

IBF 

42 

IAST 1393 

07,2750 

0182 

«F 

3TS 

last 1392 

07,2751 

0183 

BBF 

320 

last 1388 

07,2752 

0184 

0185 

mr 

48 

last 1393 

07.2753 

07.2754 

0188 

mr 

43 

last 1394 

07,2755 

01 8T 
0188 

»P 

39 

last 1385 

07.2756 

07.2757 

0189 

IBF 

13 

last 1393 

07,2760 

0190 

(S' 

258 

last 1393 

07,2761 

0191 

ep 

2 

last 148 

07,2762 

0192 

0193 

RBP 

42 

last 1394 

07.2763 

07.2764 

0194 

fBF 

44 

last 1394 

07,2765 

0195 

BBF 

42 

last 1389 

07,2766 

0190 

BEF 

1 


07,2767 

019T 

BBF 

43 

last 1394 

07,2770 

0198 

MB' 

33 

last 1390 

07,2771 

0199 

RBP 

49 

last 1394 

07,2772 

0200 

REF 

34 

LAST 1394 

07,2773 

0201 

REF 

48 

last 1390 

07,2774 

0202 

REF 

43 

last 1394 

07,2775 

0203 

RB' 

49 

LAST 1394 

07,2776 

0204 

REF 

42 

LAST 1390 

07,2777 

0205 

RBP 

24 

LAST 989 

07,3000 

0200 

Rfgp 

25 

LAST 1394 

07,3001 

020T 

RBF 

51 

last 13T7 

07,3002 

0208 

RBF 

19 

LAST 1195 

07,3003 

0209 

REP 

20 

LAST 1394 

07,3004 

0210 

IRS' 

40 

LAST 1391 

07,3005 

0211 

RBF 

2 

last 417 

07,3006 

0212 

np 

3 

LAST 1394 

07,3007 

0213 

0214 

RHF 321 

LAST 1394 

07.3010 

07.3011 


3 4707 0 

seicqars cap 

BIT 4 

0 0006 1 

eciBTO 

02 012 0 

BASD 

CHAMI2 

10 000 0 

CCS 

A 

0 0002 0 

TC 

0 

4 4705 0 

cs 

bits 

0 0006 1 

Bxiaro 

03 012 1 

«A^€) 

C«AN12 

4 4701 1 

Cs 

BlTlO 

0 0006 1 

extend 

03 014 1 

wand 

CHAN14 

4 4714 0 

Cs 

ZERO 

54 047 0 

T3 

OYHOQ4) 

3 4707 0 

CAP 

BIT4 

0 0006 1 

Exraff) 

05 012 1 

WQR 

CHAN12 

4 1036 1 

Cs 

DSPTAB ♦llD 

7 3011 0 

wac 

OCT40010 

27«036 1 

ADS 

DSPTAB ,.110 

4 1321 1 

Cs 

IMaDBS33 

7 4705 0 

M4SK 

BITB 

27«321 1 

ADS 

lMODeS33 

4 1320 0 

cs 

IMCDGS30 

7 4707 1 

M4ac 

BIT4 

27«320 0 

ADS 

IMCDES30 

4 4706 0 

RNDREPDH Cs 

bits 

7 0075 1 

wac 

FLAGWRDl 

54 075 1 

ts 

PLAOwRDl 

4 4674 1 

cs 

BITlS 

7 0076 1 

mask 

FLAGWRD2 

54 076 1 

TS 

FLAGWBD2 

4 4676 0 

cs 

BIT13 

7 0077 0 

MAac 

FLAGWRD3 

54 077 0 

T3 

FLAGWHD3 

0 0002 0 

TC 

0 

40010 1 

OCT40010 OCT 

40010 


U^bS PAQB NO. T B 3 S4 

bypass ip already in cawaE align 

IXEAH IS3 error OOUNTEBS 

KNOQc DQIN tHRO ACTTIVITY 

pirr iss IN coarse align 

HJ»I CN NO ATT LA^IP 

disable dap Auto and hold modes 

DISABLE MJPAIL 

KVOCiC DOWN TRAQC FLAG 

KNOCK DOWN DRIFT FLAG 

knock down RBPSfWT FLAG 





i 

L 

P0215 


AaSBVLS BBVriSICN 249 OP AOC PBOCSIAM COLOSSUS Blf NASA 2021111-041 
IMU MODS SirllCMIWl ROUriNBS 

OV FINE ALIGN MODE SHIICM. 



0216 




or, 3012 

0 0004 

0 

IMUPINB lf«lNT 


021T 

RHP 

4 

LAST 1391 

0T,3013 

0 3455 

0 

7C 

CAGBTSTJ 

0216 

REF 

1 


0T,3014 

4 3543 

1 

CS 

BITS4-5 

0219 




07,3015 

0 0006 

1 

BJCISND 


0220 

REF 

45 

LAST 1394 

07,3016 

03 012 

1 

WAND 

CMAN12 

0221 

REF 

SO 

LAST 1394 

07,3017 

4 4705 

0 

CS 

bits 

0222 

REF 

35 

LAST 1394 

07,3020 

7 1321 

1 

MAa( 

IHCDeS33 

0223 

REF 

36 

LAST 1395 

07,3021 

55-321 

1 

TS 

IMGDES33 

0224 

ref 

4 

LAST 1389 

07,3022 

0 3070 

0 

TC 

NOATTOFF 

0225 

REF 

40 

LAST 1394 

07,3023 

3 4701 

0 

CAF 

BITlO 

0226 

REF 

55 

LAST 1391 

07,3024 

0 5140 

1 

TC 

waitlist 

022T 

REF 

19 

LAST 1393 

E3,1474 



BBANK= 

CDUIND 

0226 

REF 

1 


07,3025 

03038 

1 

2CADH 

ipailck 

0226 

REP 

1 


07,3026 

16103 

1 



0229 

REF 

S 

LAST TT9 

07,3027 

3 4735 

1 

CAF 

2®CS 

0230 

REF 

56 

LAST 1395 

07,3030 

0 5140 

1 

TC 

waitlist 

0231 

ref 

20 

LAST 1395 

E3,1474 



ffiANK= 

CSUIND 

0232 

REF 

1 


07,3031 

03034 

0 

2CADH 

DOPINED 

0232 

REP 

1 


07,3032 

16103 

1 



0233 

REP 

3 

LAST 1391 

07,3033 

1 2557 

0 

TCP 

MCDEEXIT 

0234 

REF 

5 

LAST 1392 

07,3034 

0 3443 

1 

INUFINHI TC 

CAGETEST 

0235 

REF 

3 

LAST 1393 

07,3035 

1 3433 

1 

TCP 

B®It4J 



20*35 OCT. 26,1968 SATRAP .OOT PACE 1395 
USERbS PAOB no. 8 E3 S4 

SEE IF OV KINQ CAGED. 

sbset tEro and coarse 

INSURE DAP AUTO AND HOLD MODES BtABLED 

IHJ FAIL WAS INHIBITED DURING THE 

presumably preceding coarse align, leave 

IT □< FOR THE FIRST 5 SECS OF FINE ALIGN 


ffiB THAT NO CNE HAS CAGED THE LAV. 


Ill 


AsaMLE RBVISIQK 249 OP AOC PHOGJWM COLOSSUS BY HASA 2021111-041 

Ml tax ariiCHiNO itouriNBs 


•238 

•23T 

•238 

•23* 

•240 

•241 

•242 


US' 1 

IBP 66 LAST 1393 

BBP 44 LAST 1394 

IBP 46 lAST 1395 
IBP 3T6 last 1394 
IBP 6T LAST 1396 


0T.3038 

0T,303T 

0T.3040 

0T.3041 

07.3042 

07.3043 

07.3044 


0 3450 0 

1 5213 0 

3 4707 0 
0 0006 1 

02 012 0 
10 000 0 
1 5213 0 


IPAILCK 


7C 

TCP 


OWKTSTO 

WaCOVER 


CAP BIT4 
BXTSND 

BAND CHAN12 
A 

TA9C09EH 


CCS 

TCP 


•243 

BEP 

50 

last 1394 

07,3045 

4 1320 0 

cs 

IMODBSSO 

•244 

BfP 

47 

last 1394 

07,3046 

7 4676 0 

mac 

BIT13 

•245 

BEP 

51 

last 1396 

07,3047 

27«320 0 

ADS 

IMCBBS30 

•248 

BEP 

45 

last 1398 

07,3050 

4 4707 1 

Cs 

BIT4 

•247 

BEP 

52 

last 1396 

07,3051 

7 1320 0 

PPAILCK2 WSK 

IMODES30 

•248 

BEP 

53 

LAST 1396 

07,3052 

55«320 0 

T3 

IMODBS3O 

•24* 

BEP 

40 

last 1390 

07,3053 

0 4633 0 

7C 

ibnkcau. 

•2S0 

BEP 

6 

LAST 1390 

07,3054 

14665 1 

CADR 

ffiTISSW 

•251 

BEP 

68 

last 1396 

07,3055 

1 5213 0 

TCP 

TAacCVEH 

•252 

BBP 

2 

last 1396 

07,3056 

0 345 0 0 

PPAILCK TC 

CAGETSTO 

•253 

BEP 

69 

last 1396 

07,3057 

1 5213 0 

TCP 

waccvER 

•254 

BH' 

54 

last 1396 

07,3060 

4 1320 0 

CS 

IMODBS30 

•255 

BHP 

41 

last 1395 

07,3081 

7 4701 1 

MAac 

BITlO 

•258 

BEP 

55 

last 1396 

07,3062 

27«320 0 

ADS 

IMCDES30 

•257 

BEP 

37 

last 1395 

07,3083 

4 1321 1 

Cs 

IMODBS33 

•258 

BH' 

48 

last 1396 

07,3064 

7 4876 0 

MAa< 

BIT13 

8259 

ter 

38 

LAST 1396 

07,3065 

27-321 1 

ADS 

lMGDeS33 

•260 

BBP 

43 

last 1394 

07,3066 

4 4706 0 

CS 

bits 

•261 

BSP 

1 


07,3067 

1 3051 1 

TCP 

PPAILCK2 

•262 

BH' 

2 

LAST 1394 

07,3070 

4 3011 0 

NCMTTOPP CS 

OCT4OOIO 

6263 

BBP 

44 

last 1394 

07,3071 

7 1036 1 

mac 

DSPTAB *110 

•204 

BBP 

52 

last 1394 

07,3072 

6 4674 0 

AD 

BIT15 

0265 

REP 

45 

LAST 1396 

07,3073 

55-036 1 

T3 

DSPTAB tiiD 

•266 

BEP 322 

LAST 1394 

07,3074 

0 0002 0 

TC 

0 



20’35 OCT. 28,1968 SATRAP .007 PAOB 1396 

USR«S PAGE NO. 9 B3 S4 

BIABLB n*; PIAL UNLESS MJ BEINO CAGED 
IT IS. 

DCHT beset IMJ PAIL INHIBIT IP SO^ECNB 
HAS OCHH INTO CCttHSB ALIGN. 


beset IMOPAIL. 


THE ISS WAmiNO LiaiT MAT CO« Ol NO* 
THAT THE INHIBIT HAS 8^4 RE40/S). 


enable pip pail pros ALAHM. 

beset IMU AND PIPA PAIL BITS. 


SIERCUTINE to turn OPP NO ATT LAMP. 





ASSBOLB BB^SIOM 249 OP AOC PROCSIAM COLOSSUS BY NASA 2021111-041 


20’35 OOr. 28,1968 SAIBAP .OOT PAOB 1397 


MI MQDB sniCHtNO ROUTINES 


USRbS FAOB no. 10 B3 S4 


nnnes to initiate and teiminatb pbogbam use op the pipas. no mjstall fbouibed in ehi^ case. 


25T I>»P 1394 
12 lAOT T88 
3 LAST 430 
• LAST 788 


07.3075 4 4714 0 PIPUSE 

07.3076 54 037 1 

07.3077 54 040 1 

07,3100 54 041 0 


LAST 1396 
LAST 1390 


07,3in ® 3450 0 PIPUSEi TC 
07.SMZ 1 4570 0 TCP 


CAGETSTQ 


DO NOT B«BLB PIPA FAIL IF IHJ IS CAOHl 


78 I>ST 1383 
56 LAST 1396 
5T last 1397 


07 ,x' n 0004 0 

0T,J I 4712 0 

07,3 •' 1320 0 

0T,3&<ai> 55«320 0 


MIINT 
Cs BITI 

MASK IMCX)BS30 
TS IM0DBS30 


IP PIPA FAILS FHOl NOW CN (UNTIL 
PIPPB0B) , LIGHT ISS WAHNINO. 


41 LAST 1396 
T lAST 1396 


07,3107 0 4833 0 PIPPBEE2 iC IBNKCAU. 

07,3110 14665 1 ffiTISST 


ISS WAIHINO MIGHT (XJ* CN NCW. 
(OB 00 OPP (H PIPFBEE) . 


4 LAST 1395 07,3111 1 2557 0 


TCP HCDEEXlT 


58 LAST 1397 
79 last 1397 

59 LAST 1397 


07.3112 0 0004 0 PIPPBBE IfHlNT 

07.3113 4 1320 0 Cs IMCDESSO 

07.3114 7 4712 0 MA* BITl 

07.3115 27«320 0 ADS IMCDES30 


PBOaUM D<HE WITH PIPAS. DCNT LIGHT 
ISS WAIHINO. 


LAST 1396 
LAST 1396 
LAST 1397 


07,3118 7 4701 1 
07,3117 10 000 0 
07,3120 1 2557 0 


mac BITlO 

CCS A 

TCP HODEEXlT 


IP PIP FAIL CN, DO PBCO ALSBM AND BESET 
ISS WAHNINO. 


LAST 1393 


07.3121 0 5537 0 

07.3122 00212 0 


TC ALAR4 

OCT 212 


07,3123 0 0004 0 


0292 BBP 1 


07,3124 1 3107 0 


TCP PIPPREE2 


I 




I 


*3SB«LB HBV^ISICW 249 OP MK PBOaWM COUKSUS By NAS* 2021111.-041 
Ml MDDB MITCHINO ROUrOSS 




P0293 

R029S 

R029T 

0299 

0300 

0301 

0302 

0303 

0304 

0305 

0306 
030T 

0308 

0310 

0311 

0312 
0312 


20’35 OCT. 28,1968 SA1HAP .007 PAOB 1399 
USIUS PACE NO. 11 K3 S4 


BEOINNINO™ INPl/rS IN IHE SIX HEOIinEHS 


aa' 673 
BBP s 


BEP 


BEP 874 
BEP 51 


0313 

US' 675 

last 1398 

0314 

BEP 58 

IAST 1367 

0315 

REP 676 

last 1398 

0316 

REP 4 

last 1398 

6317 

REP 14 

last 1384 

0318 

REP 21 

last 1393 

0319 

BEP 73 

last 1392 

0320 

0321 

BEP 677 

last 1398 

0322 

BEP 22 

last 1398 

0323 

0324 

REP 678 

last 1398 

0325 

0326 

BEP 378 

last 1397 

0327 

BEP 679 

last 1398 

0328 

BEP 11 

last 1299 

0329 

BEP 680 

last 1398 

0330 

REP 681 

last 1398 

0331 



0332 

BEP 682 

last 1398 

0333 

REP 1 


0334 

BEP 683 

last 1398 

0335 

BEP 59 

last 1398 

0336 

REP 6 

last 1397 


>3,1400 


BBAJOC: 1400 


lAST 1387 
lAST 1395 


3 lAST 437 
1 


LAST 1398 
last 1395 


BEP 14 LAST 1394 

BH' 20 lAST 1363 
BEP 57 LAST 1395 
BEP 21 LAST 1395 
BEP 1 
BEP 1 


07,3125 

54 161 0 

IKJPULSB TS 

MPAC *5 

07,3126 

0 3455 0 

TC 

CAtSTSTJ 

07,3127 

11«304 0 

CCS 

LOyRO 

07.3130 

0 3171 0 

TC 

oyROBusy 

67,3131 

54 156 1 

TS 

WAC +2 

07,3132 

3 4705 1 

CAP 

bits 

07,3133 

0 0006 1 

BxiBJD 

07.3134 

05 014 1 

WOR 

CHAN14 

67,3135 

3 4710 0 

CAP 

POUR 

07.3138 

0 5140 1 

OhAkBz TC 

WA lit 1ST 

>3.1474 


BBANK: 

: CDUIND 

67,3137 

07,3140 

03207 1 
16103 1 

2CAm 

STOTOyRO 

07,3141 

3 0161 1 

CA 

MPAC *5 

07,3142 

56 003 1 

XCM 

EBANK 

07,3143 

56 161 1 

XCH 

MPAC +5 

07,3144 

55«304 0 

TS 

LGm> 

07,3145 

7 4373 0 

msc 

LOWS 

07,3146 

54 061 1 

TS 

ITEMPi 

67,3147 

3 4711 1 

CAP 

TWO 

07,3150 

54 157 0 

GyRCWGRE TS 

MPAC *3 

67,3151 

6 0000 1 

double 

67,3152 

6 0061 0 

AO 

ITEMPi 

07,3153 

54 160 1 

TS 

MPAC 

07,3154 

0 0006 1 

EXTEND 


07,3155 

5 0000 1 

INDEX 

A 

07,3156 

3 1401 0 

DCA 

1400 

67,3157 

52 155 1 

DxCH 

MPAC 

07,3160 

0 7226 0 

TC 

TPA&ee 

07,3161 

52 155 1 

DXCH 

MPAC 

07,3162 

50 160 0 

INDEX 

MPAC ,4 

07,3163 

53-401 1 

DXCH 

1400 

07,3164 

10 157 0 

CCS 

MPAC *3 

07,3165 

1 3150 1 

TCP 

GTRCWGRE 

07,3166 

3 0161 1 

CA 

MPAC *5 

07,3167 

54 003 0 

TS 

EBANK 

67,3170 

1 2557 0 

TCP 

MODEEXIT 


VARIABLE, actually. 

SAVE ARBIVINO ECADR. 

DCNT PHOCEH) IP IMU BEINQ ranm 

SEE IP O7R0S Busy. 
aEEP. 


aWBLE THE POiffiH SUPPUy. 


( IP A JOB WAS PUT TO SLEEP, THE POWER 
aiPPLy Is LEPT (H By the W^INO JOB). 


®T UP EBANk, saving CALLER.S EBANk POR 
BESTOBATICN Q7 RBTUIW. 

RESERVES OyROS. 


PCHCE SIGN AGREEMENT CN INPUTS. 




BESTORB CAUER.S EHANK. 



1 



u 


P033T 

0338 

0339 

0340 

0341 

0342 

0343 

0344 

0345 
0340 
034T 

0348 

0349 

0350 

0351 


ASSaeLB BBVlSItW 249 OP AGO PBQGBAM CMLOSSUS Bf MASA 2021111-041 
IMU woe SOIlCHINa bcxjtinbs 

nairiNBs to aluw tobouino bt only a® job at a ti*. 


HBP 20 LAST 1160 
HHP 084 last 1398 
HEP 1 

REP 5 LAST 1294 
last 1398 


REP 5 
REP 1 

REP 685 LAST 1399 

HEP 686 last 1399 
HEP 21 LAST 1399 
HEP 160 LAST 1384 
REP 1 

HEP 1 


67.31T1 

0T.31T2 

07,31T3 

0T.31T4 

0T.31T5 

0T,31T6 

0T,3m 

07.3200 

07.3201 

07.3202 

07.3203 

07.3204 

07.3205 


0 0006 1 
3 0134 1 
52 155 1 
3 3206 0 
1 5070 1 

11«304 0 
1 3174 1 

54 156 1 


OTHCBUSY EbOB© 

DCA BlF2 
nxCM MPAC 
RBOSLEEP CAP LGOAKE 

TCP JOBiEEP 


gkakb 


CCS 

TCP 


LOYRO 

RBOSLEEP 


0 0006 
3 0155 
52 134 
3 4712 
1 3136 


TS MPAC *2 

EXTB© 

DCA MPAC 
DJCCH BUP2 
CAP Q4E 
TCP a«AKE2 


20*35 OCT. 28,1968 SATRAP .007 PAOE 1399 
USER«S PAOE NO. 12 B3 S4 

SAVE HETUIW 2PCADR. 


AwAkEPED, ffiE IP GYROS STILL BUSY. 
IP SO, SJB? sae more. 


leSTORE aiBEIUIW INFO. 


07,3206 17176 1 lJa»AKE CADR OaAkB 



A3SS«8 HBV^ISICK 249 OP AOC PBOGBAM COLOSSU3 BY HASA 2021111-041 
ntl MCD8 sniCHINO HOl/riNBS 


20’35 OCT. 28,196B SATRAP .OOT PACE 1400 




P0352 

0353 

0354 

0355 

0356 

035T 

0358 

0359 
0380 

0361 

0362 

0363 

0364 

0365 

0386 

636T 

0388 

0369 

0370 

0371 

0372 




OYRO-TQRaUINO WAITtlST TASKS. 



BSP 

1 


07,3207 

4 3430 1 

STRIOYRO Cs 

mesaCT 




07,3210 

0 0006 1 

i6a»o 

tey 

15 

tASr 1398 

07,3211 

03 014 1 

CAM) 

CHAN14 

REP 

0 

IAST 1395 

07,3212 

0 3443 1 

1C 

CAOSIEST 

REP 

6 

WST 1399 

07,3213 

3 1304 1 

STRTOYR2 CA 

LGYHO 




07,3214 

0 0006 1 

Rxiao 

REP 

46 

last 1396 

07,3215 

7 4707 1 

MP 

BtT4 

fSP 

379 

LAST 1398 

07,3216 

50 000 1 

INDEX 

A 




07,3217 

1 3220 0 

TCP 

♦1 

REP 

1 


07,3220 

0 3235 0 

1C 

osEmir 




07,3221 

00202 1 

OCT 

00202 

RB* 

2 

last 1400 

07,3222 

0 3235 0 

1C 

OfflLECr 




07,3223 

00302 0 

OCT 

00302 

RH' 

3 

LAST 1400 

07,3224 

0 3233 0 

1C 

0®LECT -; 




07,3225 

00100 0 

OCT 

00100 

REP 2S8 

last 1397 

07,3226 

3 4714 1 

CAP 

^RO 


t 

last 1400 

07,3227 

55«304 0 

TS 

LGYRO 

REP 

2 

last 1399 

07,3230 

3 3206 0 

CAP 

IORAkE 

REP 

6 

last 1294 

07,3231 

0 5074 1 

1C 

jcbwake 

REP 

2 

last 1395 

07,3232 

1 3034 1 

NORESBT TCP 

D4JFINH) 


USBRkS pace no. 13. B3 S4 

de-selbct last omo. 

AWP CN PHASE COETER IN BITS 13-14. 

=0. DO y GYRO. 

=1. DO Z OYRO. 

=2. DO X OYRO. 

=3. DCNB 

wake a possible sleeping job. 

DO NOT RESET PCWER SUPPLY 











ASSBCLE BBVISIQM 249 OP AOC PBOOtWM COLOSSUS BY NAS* 2021111-041 


20*35 OCT. 28,1968 SATHAP .OOT PAOB 1401 


L IMU MSB WIlCHINa ROUTIMBS 


USeBaS PAOB NO. 14 E3 S4 


•3T3 

03T4 


•3T5 

•STS 

•3TT 

•3T8 

•3T9 

•380 

•381 

0382 

•383 

•384 

•385 

•380 

•38T 

•388 

0389 

0390 


0391 

•392 

0393 

0394 



0395 

0390 

039T 

0398 

0399 


RBP 

21 

tAST 1398 

07.3233 

4 4710 1 

IBP 

8 

lAST 1400 

0T,3234 

2T«3a4 0 

REP 

323 

LAST 1396 

0T,3235 

50 002 0 




0T,3230 

3 0000 1 

REP 

4 

LAST.13T9 

07,3237 

54 064 1 

REP 

20 

LAST 13T1 

07,3240 

7 4716 1 

RES' 

49 

LAST 1398 

07,3241 

6 4676 1 

REP 

9 

LAST 1401 

07,3242 

27*304 0 

REP 

00 

LAST 1398 

07,3243 . 

54 003 0 

REP 

15 

LAST 1398 

07,3244 

7 4373 0 

HEP 

23 

LAST 1398 

07,3245 

54 061 1 

HEP 

21 

LAST 1401 

07,3246 

4 4716 1 

REP 

5 

lAST 1401 

07,3247 

7 0064 1 

RBP 

0 

LAST 1401 

07,3230 

54 064 1 




07,3231 

0 0006 1 

REP 

24 

LAST 1401 

07.3252 

5 0061 0 




07,3233 

3 1401 0 

REP 

28 

LAST 1379 

07.3254 

52 071 0 

REP 

29 

LAST 1401 

07,3255 

10 070 1 

REP 

1 


07,3256 

1 3271 1 




07,3257 

1 3261 0 

RBP 

1 


07,3260 

1 3411 1 

REP 

T 

LAST 1379 

07,3261 

10 071 0 

REF 

1 


07,3262 

1 3266 1 

REP 

1 


07,3263 

1 3213 0 

RBP 

1 


07,3264 

1 3406 1 

HEP 

2 

LAST 1401 

07,3265 

1 3213 0 


CS 

PCUR 

ADS 

LOYRO 

INDEX 

0 

CAP 

0 

TS 

ITBIP4 

MAac 

ffiVBC 

AD 

BITlS 

ADS 

LOYRO 

TS 

ERANK 

MAac 

LOTS 

TS 

ITEMPl 

CS 

ffiVBI 

MAac 

n®4P4 

TS 

nB4P4 

EXTEND 

INDEX 

n»ipi 

DCA 

1400 

DXCM 

RJPTBEOl 

CCS 

OJPTREOi 

TCP 

MAJ+ 

TCP 

*2 

TCP 

MAJ- 

CCS 

HJPTRE02 

TCP 

MIN+ 

TCP 

STK1CYH2 

TCP 

MIN- 

TCP 

SXRTPYH2 


special entry to RBORBSS LOHIO POR X. 


sBiBCT mmo. 

PAQcQ) WORD CCNTAINS OYRO SELK^T BITS 
AND INCREEB^T TO LffifHO. 


MOVE DP CCM4AND TO HJPTBBOS FOR TSSTING. 





*S3»«LE RBVISICM 249 Cy AGC PBOOWM COUMSUS BY KASA 202H11-041 
Dtl woe SWllCHlNO ROUTINES 


20*35 OCT. 28,1988 SATOAP .flOT PAGE 1402 


III 


•400 

•401 

•402 

•403 

0404 

0405 

•400 

040T 


3 LAST 1401 


1 

30 


•409 

•410 

•411 

•412 

•413 

0414 

0415 
0418 
•41t 

0418 

0419 
•420 
•421 
•422 

•423 

•424 

0425 

•428 

042T 

•428 

0429 

•430 

•431 

•432 

•433 

•434 


last 1401 


' T LAST 1401 

* 18 LAST 1400 

■ 10 LAST 1387 
' 8 LAST 1401 

9 LAST 1402 

‘ 30 LAST 1378 
' 17 LAST 1379 

31 LAST 1402 

35 LAST 1389 

32 LAST 1402 
225 LAST 1391 


78 

18 


FH* 33 
RBP 1 
SaB 380 
BPSP 1 


LAST 1363 
last 1402 


LAST 1402 
last 1400 


77 LAST 1402 
19 LAST 1402 
259 LAST 1400 

25 LAST 1401 


07,3266 

8 3322 1 

MIN* 

AO 

-GYINMIN 

07,3267 

0 0006 1 


EXTEM) 

07,3270 

6 3213 1 


B04P 

STRTOYRz 

07,3271 

0 0006 1 

MAJ> 

EXTB® 

07,3272 

3 3432 1 


DCA 

OYROPRAC 

07,3273 

20 071 0 


ms 

HJPTBEOl 

07,3274 

3 0064 0 


CA 

1TEMP4 

07,3275 

0 0006 1 


Ejciero 

07,3276 

05 014 1 


WOR 

CHAN14 

07,3277 

3 6043 0 


CAP 

L0W7 

07,3300 

7 0071 0 


mask 

ajPTREOz 

07,3301 

56 071 1 


XCM 

aa*TRE02 

07,3302 

0 0006 1 

CPeBGB 

Exraro 


07,3303 

7 4703 0 


MP 

bits 

07.3304 

54 062 1 


TS 

ITBIPS 

07,3305 

3 0070 0 


CA 

HJPTHBQi 

07,3306 

0 0006 1 


Extend 


07,3307 

7 4702 1 


MP 

BIT9 

07,3310 

54 070 1 


TS 

ajPTREOl 

07,3311 

3 0001 0 


CA 

L 

07,3312 

0 0006 1 


BXT®)D 


07,3313 

7 4675 0 


MP 

BIT14 

07,3314 

26 062 1 


ADS 

ITH4P2 

07,3315 

0 0006 1 


EXTEND 


07,3316 

3 0071 1 


DCA 

aiPTHBOi 

07,3317 

6 7716 0 


AD 

MINUSl 

07,3320 

10 000 0 


CCS 

A 

07,3321 

1 3345 1 


TCP 

L,/«3GYRO 

07,3322 

77601 0 

-GYRCMIN 

OCT 

-176 

07,3323 

1 3327 0 


TCP 

♦4 

07,3324 

3 4675 1 


CAP 

B1T14 

07,3325 

26 062 1 


AOS 

ITEMP2 

07,3326 

3 4714 1 


CAP 

zero 

07,3327 

SO 061 0 

♦4 

INDEX 

ITB4P1 

07,3330 

53O401 1 


RXCH 

1400 




USBRiiS PACE NO. 15 


B3 S4 


»«LL POSITIVE CCM4WD. SEE IP AT LEAST 
18 GYRO PULSES. 


DBPINIIE POSITIVE OUTPUT. 


select positive TOBQUINO POB THIS GiffiO. 


LEAVE lUeBR OP possible 8192 AuCMEJfTS 
TO INITIAL COMAND IN MAJOR PART OP LCNO 
term stobagb and THJNCATHD PBACTIOI 
IN MINOR PART. THE MAJOR PART WILL m 
CCUNTH) DOWN TO ZERO IN THE COURSE OP 
IVTTINO CUT THE B7TIRE CCM4AND. 


INITIAL CCM4AND. 

ffiE IP MORE THAN CNE PULSE TRAIN NEEDED 
(MORE THAN 16383 PULSES) . 


MAY BE ADJUSTED TO SPECIPY MINIMUM (5>© 






Ul 


bBVISICH 249 OP AOC PROGRAM COLOSSUS B5f KASA 2021111~041 

Mj MBie ariiCHiMO routines 


20’35 OCT. 28,1968 SATOAP .DOT PAOE 1403 
USEBbS PAOB no. 16 B3 84 


0435 

BBP 

20 

LAST 1402 

07,3331 

0436 

HEP 

3 

LAST 1394 

0T,3332 

043T 




0T,3333 

0438 

BBP 

43 

lAST 139T 

07,3334 

0439 

REP 

4T 

lAST 138T 

07,3335 

0440 

BBP 

58 

lAST 1398 

07,3336 

0441 

BBP 

22 

LAST 1398 

E3,1474 

0442 

BBP 

2 

LAST 1398 

07,3337 

0442 




07,3340 

0448 

BBP 

44 

LAST 1403 

07,3341 

0449 




07,3342 

0450 

REP 

IT 

LAST 1402 

07,3343 

0451 

BBP 

TO 

LAST 1398 

07,3344 

0452 

BBP 

26 

LAST 1402 

07,3345 

0453 




07,3346 

0454 

REP 

T 8 

LAST 1402 

07,3347 

0455 

REP 

21 

LAST 1403 

07,3350 

0456 

REP 

4 

lAST 1403 

07.3351 

045T 




07,3352 

0458 

IKP 

45 

LAST 1403 

07,3353 

0459 

HEP 

4 

LAST 1384 

07,3354 

0460 

REP 

59 

LAST 1403 

07,3355 

0461 

BEP 

23 

LAST 1403 

83,1474 

0462 

BEP 

1 


07,3356 

0462 

BBP 

1 


07,3357 

0463 

HEP 

1 


07,3360 

0464 

BB' 

T 

LAST 1400 

07,3381 

04641 

HEP 

4T 

LAST 1400 

07,3362 

04642 




07,3363 

04643 

BEP 

4T 

LAST 1398 

07,3364 

04644 

REP 

381 

LAST 1402 

07,3365 

04645 

REP 

3 

LAST 1393 

07,3366 

0465 

REP 

10 

LAST 1401 

.07,3367 

0466 

BBP 

61 

LAST 1401 

07,3370 

046T 

BEP 

16 

LAST 1401 

07,3371 

0468 

BEP 

2T 

LAST 1403 

07,3372 

0469 

REP 

28 

LAST 1403 

07,3373 

04T0 




07,3374 

04T1 

ISP 

1 


07,3375 

04TZ 

BBP 

T9 

LAST 1403 

07,3376 

64T3 

BEP 

5 

LAST 1403 

07,3377 

04T4 

REP 

1 


07,3400 


3 0062 

0 

CA 

1TB4P2 

54 047 

0 

LASTSEO T3 

OntOOD 

0 0006 

1 

EXTBO 


T 4701 

1 

» 

BITIO 

6 6214 

0 

AD 

THREE 

0 5140 

1 

1 C 

waitlist 

03207 

1 

BBANK= 

2 CADB 

CDUIND 

snnaTRO 

16103 

3 4701 

1 

0 

OTBOEXIT CAP 

BITlO 

0 0006 

1 

BOBTO 


05 014 

1 

WOR 

CMAN14 

1 5213 

0 

TCP 

TAacCWEH 

SO 061 

0 

LCNGGfflO MKX 

ITBMPl 

53M01 

1 

DXCH 

1400 

3 4875 

1 

CAP 

BI'n4 

6 0062 

0 

AD 

nB4P2 

54 047 

0 

TS 

oyROCW) 

0 0006 

1 

AUO 3 BlOB© 


7 4701 

1 

MP 

BlTlO 

6 7714 

1 

W 

NBQ 3 

0 5140 

1 

IC 

WAITLIST 

03361 

0 

EBANK= 

2 CADR 

CDUIND 

B192AIX3 

16103 
1 3341 

1 

0 

TCP 

OTROEXIT 

0 3443 

1 

8 I 92 AOG IC 

CACBIEST 

3 4707 

0 

CAP 

BIT4 

0 0006 

1 

Bjciero 


02 012 

0 

BAND 

CHAN 12 

10 000 

0 

CCS 

A 

1 3441 

1 

TCP 

ISUHAD 

3 1304 

1 

CA 

LOTBO 

54 003 

0 

TS 

HIANK 

7 4373 

0 

MASK 

LOWS 

54 061 

1 

TS 

ITBMPl 

50 061 

0 

IM»C 

ITBIPl 

11«400 

0 

CCS 

1400 

1 3401 

0 

TCP 

AU02 

3 4675 

1 

CAP 

BIT14 

26 047 

0 

ADS 

OYBOCJC) 

1 3333 

0 

TCP 

LASTSEG ♦! 


BrrlBB COMAND. 

WAITLIST DT 

THHCATION AND PHASE UNCERTAINTIES. 


initial CCM4AND OUT PLUS N AOGPBJTS OP 
8192. INITIAL COWAND IS AT LEAST 8192. 


GET WAITLIST DT TO TIME WHEN TRAIN IS 

almost cut. 


ADD 8192 PULSES TO GYROCM) 

SEE IP THIS IS THE LAST AUG. 

MORE TO coe. 




*S3B«LE REVISION 249 OP MC PROISWM COLOSSUS BY NASA 2021111-041 
mi MODE OTITCMINO Rourues 


20*35 OCT. 29,1968 SATRAP .OOT PAOB 1404 



L 


04TS 

MB' 

29 

last 1403 

0T,3401 

04Te 




0T,3402 

04TT 

tey 

80 

last 1403 

OT,3403 

MTS 

mr 

6 

last 1403 

07,3404 

MTO 

RO' 

1 


0T.340S 


50 061 0 Aua2 

INDEX 

ITtMPl 

S5«400 0 

T3 

1400 

3 4675 1 

CAP 

BIT14 

26 047 0 

AOS 

OYKOO® 

1 3352 1 

TCP 

AUI 3 


USBRkS PAOB no. it B3 S4 


OtHPUlB DT. 





ii 


Assaeu RB^SION 24g OP AGC'PROCStAM COLOSSUS BY NASA 2021111-041 
Otl HODB SVITCHINO ROUTINES 


0480 

REP 

2 

LAST 

1402 

0481 





0482 

ffiP 

4 

LAST 

1402 

0483 





0484 

HEP 

2 

LAST 

1402 

8485 

REP 

34 

lAST 

1402 

0486 

lep 

8 

LAST 

1402 

048T 

REP 

30 

lAST 

1402 

0488 





0489 

REP 

18 

LAST 

1403 

0490 

IBP 

35 

LAST 

1405 

0491 

REP 

36 

LAST 

1405 

0492 

REP 

10 

LAST 

1402 

0493 

REP 

11 

lAST 

1402 

0494 





0495 

REP 

11 

LAST 

1405 

0498 





049T 

BBP 

1 




0498 


0499 

0499 



07,3406 

6 3322 

1 

MIN- AD 

-GYRCMIN 

07,3407 

0 0006 

1 

EJCIEND 


07,3410 

6 3213 

1 

B2MP 

STOTOYHS 

07,3411 

0 0006 

1 

MAJ- BX1BID 


07,3412 

4 3432 

0 

DCS 

GYROPRAC 

07,3413 

20 071 

0 

DAS 

aiPTRBGl 

07,3414 

3 0064 

0 

CA 

nB4P4 

07,3415 

6 4702 

0 

AD 

BIT9 

07,3416 

0 0006 

1 

EiClB® 


07,3417 

05 014 

1 

«0R 

CHAN14 

07,3420 

4 0070 

1 

Cs 

ajPTRBGl 

07,3421 

54 070 

1 

TS 

RIPTREGl 

07,3422 

4 0071 

0 

CS 

BJPTBE02 

07,3423 

7 6043 

1 

MASK 

L0W7 

07,3424 

4 0000 

0 

Ca4 


07,3425 

56 071 

i 

XCH 

r;ptreg2 

07,3426 

4 0000 

0 

CCM 


07,3427 

1 3302 

1 

TCP 

oenoB 

07,3430 

01700 

1 

GDE^LCT OCT 

1700 

07.3431 

07.3432 

00000 

00034 

1 

0 

OYRQPRAC 2DEC 

.215 B -21 


20’35 OCt. 28,1968 SATHAP .DOT PAGE 1405 
U^kS PAOB NO. 18 B3 S4 

possible negative OUTPUT. 


DBPINITB NEGATIVE OUTPUT. 


select negative TOBOUINO POE THIS GYRO. 


®T UP HUPTteGS TO PAU, INTO Gm»B. 
ALL NITBEHS PUT INTO GYHOCMl ARE 
POSITIVE - BITS OP CHAN 14 DETERMINES 
THE SIGN OP H« COMAND. 


TJIN OPP SELE(?T and activity BITS. 




i 




AsseeLK i(B\nsicN 249 op aoc pkokmm colossus by nasa 2021111-041 


V D*j Mcoe sniCHim routines 


20’35 OCT. 28,1068 SATRAP .OOT PAGE 1408 
USERaS PAOB NO. 19 83 S4 


N500 MI Mcoe ariiQfiNa routines cob herb rhen actiok coipleis 


0501 

0502 

REF 

33 

IAST 1190 

07.3433 

07.3434 

0503 

REF 

80 

IAST 1397 

07,3435 

0504 

REF 

382 

IAST 1403 

07,3436 

0505 

REF 

4 

IAST 1403 

07,3437 

0506 

REF 

3 

IAST 578 

07,3440 

0507 

REF 

260 

IAST 1402 

07,3441 

0508 

REF 

2 

LAST 578 

07,3442 

0509 

REF 

52 

last 1398 

07,3443 

0510 

REF 

60 

last 1397 

07,3444 

0511 

REF 

383 

last 1406 

07,3445 

0512 

IBF 

5 

LAST 1406 

07,3446 

0513 

REF 

324 

last 1401 

07,3447 

0514 

REF 

61 

LAST 1406 

07,3450 

0515 

REF 

53 

last 1406 

07,3451 

0510 

REP 

384 

IAST 1406 

07,3452 

0517 

REP 

325 

last 1406 

07,3453 

0518 

REF 

326 

last 1406 

07,3454 

0519 

REP 

62 

last 1406 

07,3455 

0520 

REP 

54 

last 1406 

07,3458 

0521 

REP 

385 

LAST 1408 

07,3457 

0522 

REF 

327 

last 1406 

07,3460 

0523 

REF 

261 

LAST 1406 

07,3461 

0524 

REP 

3 

LAST 1195 

07,3462 

0525 

REP 

7 

last 1398 

07,3463 


0 0006 

1 

END IMU 

EjcracD 


00 011 

1 


READ 

DSAUCUT 

7 4712 

0 


MAac 

BlTl 

10 000 

0 


CCS 

A 

1 3441 

1 


TCP 

MBAD 

1 3467 

0 

DUGOCD 

TCP 

oocoecD 

3 4714 

1 

MlflAD 

CAP 

2ERO 

1 3464 

0 


TCP 

BAOB4D 

3 4705 

1 

CAGEIEST CAP 

bits 

7 1320 

0 


mac 

IMODBS30 

10 000 

0 


CCS 

A 

1 3441 

1 


TCP 

IMIBAD 

0 0002 

0 


TC 

0 


4 1320 

0 

CACBTSTQ CS 

IMCEESSO 

7 4705 

0 

mask 

bits 

10 000 

0 

CCS 

A 

24 002 

0 

INCH 

0 

0 0002 

0 

TC 

0 

4 1320 

0 

cagetstj cs 

IMOD6S30 

7 4705 

0 

MASK 

BITB 

10 000 

0 

CCS 

A 

0 0002 

0 

TC 

0 

4 4714 

0 

Cs 

ZERO 

SS«322 

1 

TS 

IMUCADR 

1 2557 

0 

TCP 

MQDeJBjCIT 


MCBB IS bad if CAOB HAS CCCURED OR IF 
ISS warnino is cn. 


WITH CCA) = 0. 

subroutine to terminate do MCBE 

a»ITCH IF IMU HAS BEBI CACTED. 

DIRECTUY. 

WITH CCA) = +0. 

SKIP IF IMU NOT BBINO CAOED, 


IF IXJHINO MODE SWITCH INITIALIZATICN 
IT IS FOUND THAT THE IHJ IS BEING CAGED, 
SET IMJCADR TO -0 TO INDICATE OPERATION 
CCMPLETE Hut failed. RBrureC If«DIATELY 

TO SWRBTURN. 








Ill 


AsaaCLB revision 249 op AOC PROTOAM COUSSUS BV NASA 2021111-041 
WU MDDB wnCHINQ ROUTINES 


20*35 OCT. 28,1968 SATOAP ,007 PAGE 1407 
USERkS PAOB no. 20 E3 S4 


Pa528 

nS28 


CBfflRALIZff) HCDB SrlTCHINO TERMINATION. BNTER AT OOODB® FOR aXXSSWll. CCMPLETIW OP AN I/O OPEHATIW 
OR AT EWDBND POR A N ONSUOtESSPUb ONE, CIA) OR ARRIVAL =0 FOR Ml, 1 FOR OPTICS. 


0530 

REP 

12 

LAST 

1405 

07,3464 

54 071 

0 

0531 

REF 

282 

LAST 

1406 

07,3465 

4 4714 

0 

0532 

REP 

4 

LAST 

1406 

07,3466 

1 3471 

1 

0533 

REP 

13 

LAST 

1407 

07,3467 

54 071 

0 

0534 

REF 

161- 

LAST 

1399 

07,3470 

4 4712 

0 

0535 

REP 

6 

LAST 

1379 

07,3471 

54 072 

0 

0538 

REF 

14 

LAST 

1407 

07,3472 

50 071 

1 

0537 

REF 

5 

LAST 

237 

07,3473 

11«322 

1 

0538 





07,3474 

1 3476 

0 

0539 

REP 

1 



07.3475 

1 3506 

0 

0540 

REF 

283 

LAST 

1407 

07,3476 

3 4714 

1 

0541 

REF 

15 

LAST 

1407 

07,3477 

50 071 

1 

0542 

REF 

6 

LAST 

1407 

07,3500 

57«322 

0 

0543 

REF 

7 

LAST 

1400 

07,3501 

0 5074 

X 

0544 

REP 

7 

LAST 

1407 

07,3502 

4 0072 

0 

0545 

REP 

23 

LAST 

1294 

07.3503 

50 084 

0 

0546 

REP 

41 

LAST 

1190 

07,3504 

26 164 

0 

0547 

REP 

71 

LAST 

1403 

07,3505 

1 5213 

0 

0548 

REP 

8 

LAST 

1407 

07.3506 

3 0072 

1 

0549 

REP 

16 

LAST 

1407 

07,3507 

50 071 

1 

0550 

REP 

7 

LAST 

1407 

07,3510 

55«322 

1 

0551 

REP 

72 

LAST 

1407 

07,3511 

1 5213 

0 


OOODBID 


TS 

C3 

TCP 

TS 

CS 


ajPTRBQ2 

2ERO 

QOCSeS) 4^2 

HUPTBBQ2 

CME 


DBVIOE INDEX. 
FOR FAILURE. 


FOR SUCCESS. 


TS RJPTHBO3 
DBEX IDPTHBG2 
MSeCAOR 
♦2 

SNCMCDS 


CCS 

TCF 

TCF 


CAP 2ERO 
INDEX RIPTBB02 
MCDECADR 

jcbhake 


XW 

IC 


Cs RJPTBEOa 

INDEX LOCCTR 
ADS LOC 

TCP T»acOl/ER 


SEE IF USING PROGRAM ASLEEP. 

TBS - wake it op. 

IF 0, PROGRAM NOT IN YET. 

wake SLEEPING PROaWM. 


ADVANCE LOC IF SUCCESSFUL. 


aiDMCBB 


CA 

INDEX 

TS 

TCF 


RJPTREO3 

IIJPTREG2 

MCDECADR 

WacOVER 


-0 INDICATES OPERATICN COMPLETE BUT 
UNSUCCESSFUL - -1 INDICATES CCMPLEIB AND 
SUCCESSFUL. 




11 


P0SS2 

1(0554 

1(0555 

1(0558 

1(0557 

1(0558 

i(0559 

1(0580 

1(0501 

ttOSSZ 

1(0503 

1(0504 

K0505 

1(0500 

ROSOT 

1(0508 

Roses 

R05T0 

R05T1 

R05T2 

R05T3 

10574 

H0575 

R057S 

R0577 

R0578 

R0579 

R0580 

R0581 

R0582 

R0583 

R0S84 

R0S8S 

R0580 

R0587 

R0S88 


20-35 ocr. 28.1968 sa 7 «ap .007 pace 1408 

Mi ««««,i«aHarriNR 8 u®us p«b ro. „ *3*4 

aacRAL sniLLiNa Ron-iNE. usino programs com herb to wait for i/o ccmplcticn. 

PRtXWMCBSftllPHCW I««- 2, PER 1967 

PU«ri(NAL dbsOripticn- 

TO DH^PUKIHER ©cECurlW OP THE (MLLINO ROIPINE UNTIL ITS SELE(?reD 

TOLLWINO QfflCkS (M THE CAILING ROUTINE -S 

IWDBCADR arb made and acted upon. 

1» *0 IWICATES incomplete I/O OPBRATICN.CALLINO HOUTINB IS PUT TO 



21 ^ OOICATES CCMPLETHJ I/O opbhaticn. stall bypasses jcbslebp 
OML AMI RETURNS TO CALLING ROUTINE AT L+3 
31 -0 DOIICATBS (XWPLETED I/O WITH PAIIURB. STALL CLEARS MCDECADR 
AlO BEIUIWS TO CALLING ROUTINE AT L*.2. 

4l «AUB greater than 0 INDICATES TWO ROUTINES CALLING POR U® OP 
SAi« DEVICE. STALL EXITS TO ABORT WHICH EXECUTES A PROGRAM 
RBSIAHT imiCJI IN TUroi clears all modecadr rbgisiers. 

CALLING seoje^CE- 
L IC BA,>4(CALL 

1*1 CADR CLUB OP 5 STALL ADORES®S I.E. IHJSTALL.OPTSIAIL RADSIAIL 
AOTSTAIL.OR ATTSIALL) ’ 

WXMAL-EXIT MODE- 
TOP JQBSLEBP OR TCP MODExIT 

AIAm m ABORT EXIT MODE- 

ic abort 

OUTPUT- 

mddbcadh^ cadh ip jobsleep 
MCDBCAO et^o IP I/O complete 
ft^^^=L^3 IP I/O CCMPLETB AND GOOD. 

BIF2=L*2 IE I/O CQ4PLETE BUT FAILED. 



erasable witializaticn- 

OOnAINS RBIURN ADDRESS PUTS 1,(L<.2) 
ftF2*l CWTAINS prank VAUB OP CALLING ROUTINE, 

HODBCADR OP (MlLING ROUTINE CONTAINS +0,-l,-0 CR CADR RETURN ADDRESS. 
DEBRIS- 

WPTRBGz A.>® CALLING ROUTINE MCDECADR. 


0589 

RBP 

162 

CAST 1407 

07,3512 

3 

4712 

1 

AOTSTALL CAP 

QfS 

0590 

REP 

1 


07,3513 

0 

3517 

1 

7C 

STAUj 

0591 

PSF 

T4 

LAST 1398 

07,3514 

3 

4711 

1 

radsiall cap 

TWO 

0592 

HEP 

2 

LAST 1408 

07,3515 

1 

3517 

0 

*lCP 

STAIJ^ 


aot. 
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ASSaetE REVISION 249 OP AOC PROGRAM COLOSSUS BV NASA 2021111-041 
IMU MOOe SVIlCHINO ROUTIies 


20’35 OCT. 28,1968 SATRAP .OOT PACE 1409 
USBR«S PAGE NO. 22 B3 34 


0593 

REP 

1 


0T.3S12 



OPTSTALL EQUALS AOrSTALL 


0594 

REP 284 

LAST 140T 

OT.3516 

3 4714 

1 

imustall cap 

ISBO 

IMU. 

0595 




•T.351T 

0 0004 

0 

STALL 

IMIINT 



0598 

REP 

IT 

LAST 140T 

07.3520 

54 071 

0 


TS 

ajPTRBQ2 

SAVE DEVICE INDEX. 

059T 

REP 

386 

LAST 1406 

07,3521 

50 000 

1 


INDEX 

A 

ffiE IP OPEHATICN CCMPLETE. 

0598 

REP 

8 

LAST 140T 

07,3522 

ll'»322 

1 


CCS 

HCDECADR 


0599 

REP 

1 


07.3523 

1 3541 

0 


TCP 

MODABOHT 

ALLOWABLE STATES ABE +0, -1, AND -0. 

0800 

REP 

1 


07.3524 

1 3535 

0 


TCP 

MCDESLP 

OPEHATICN INCCMPLETE. 

0801 

REP 

1 


07.3525 

1 3531 

1 


TCP 

MCSEOOCD 

ccmpletb and good ip = -1 . 

0802 

REP 

18 

lAST 1409 

07,3526 

50 071 

1 

M02 

INDEX 

ajPTRB02 

COMPLETE AND FAILED IF -0. BESET TO *0. 

0603 

BEP 

9 

LAST 1409 

07.3527 

55«322 

1 


■ra 

MODECADR 

HETUWt TO CALLER. 

0604 

REP 

8 

LAST 1406 

07.3530 

1 2557 

0 


TCP 

MODEEXIT 


0605 

BEP 

387 

LAST 1409 

07.3531 

10 000 

0 

MCDEOOCD CCS 

A 

mike sure initial state - 1 . 

0606 

BEP 

2 

LAST 1409 

07.3532 

1 3541 

0 


TCP 

MODABOHT 


080T 

BEP 

22 

LAST 1399 

07.3533 

24 133 

0 


INCH 

BUP2 

IF SO, iNCRa®fr bbtuhn address and 

0608 

BEP 

1 


07,3534 

1 3526 

1 


TCP 

MQ2 

RBTUiei Ii+K)IATELy, SETTING CADR = +0. 

0609 

BEP 

5 

UST T30 

07,3535 

0 4604 

1 

MQDESLP 

IC 

makecadb 

CALL FRCM SWIIQIABLE FIXED ONLY. 

0610 

BEP 

19 

LAST 1409 

07,3538 

50 071 

1 


INDEX 

I4JP1HE02 


0611 

BEP 

10 

LAST 1409 

07,3537 

55«322 

1 


TS 

MODECADR 


0812 

BEP 

6 

LAST 1399 

07,3540 

1 5070 

1 


TCP 

JOBSLHBP 


0613 

BEP 

4 

LAST 1154 

07,3541 

0 5622 

1 

MODABOHT 

tc 

POODOO 

TWO PROGRAMS USING SA."* DEVICE. 

0614 




07,3542 

01210 

0 


OCT 

1210 






L 


A3S»«:£ BEVISION 249 OP AGO PBOfflWM CQUMSUS BY NASA 2021111-041 
Ml HODB SWItCHlNO HCWTINES 


20 ’35 OCT. 28,1968 SATBAP .007 PAGE 1410 



USBIUS PAGE NO. 23 B 3 S4 


Poais 


CONSTANTS FOR MODB SWITCHINO HOOTINES 


Ml* 

HBP 

4 

LAST 

1011 

MIT 

BBE 

5 

LAST 

1364 

MIS 





Ml« 

REP 

31 

LAST 

1402 

M20 





M21 





M22 





M23 

REP 

3 

LAST 

417 

M24 

REP 

4 

LAST 

411 

M2S 





M2* 





M2T 

REE 

5 

LAST 1409 

M28 





M29 





M30 

REP 

23 

LAST 

1409 

M32 

REP 

5 

LAST 

1410 

M33 

REP 

34 

LAST 

1379 

M34 

REP 

22 

LAST 

1401 

M35 

REP 

8 

LAST 

1410 

M42 

REP 

27 

LAST 

iiaa 

M43 

REP 

2 

LAST 

198 

0*44 

REP 

2 

LAST 

411 

M452 

REP 

1 



M453 

HEP 

62 

LAST 

1403 

M454 

REP 

62 

LAST 1365 

M45S 

REP 

1 



M4S6 

REP 

16 

LAST 

410 


5656 


BIT33<i4 

S 

OCT14 


4726 


BITS4d6 

S 

OCTSO 


07,3543 

00030 1 

BITS4-5 

OCT 

00030 


4703 


IMUSEPLO equals BITS 

INTERPRETER SNITCH 7 . 

07,3544 

77500 1 

-COMAX 

DEC 

-191 


07,3545 

TT4TT 0 

-COMAX- 

DEC 

-192 


07,3546 

00074 1 

6 OOMS 

DEC 

60 


07,3012 


1HJP1N20 

= 

MJPINB 


07,3547 

3 1325 1 

OCHANUR 

CA 

ATICADH 

IS kalowno PREE 

07,3550 

0 0008 1 


EXTEND 


07,3551 

1 3554 1 


BzP 

♦3 


07,3552 

0 5622 1 


7C 

POODOO 

NO 

07,3553 

01210 0 


OCT 

1210 

2 THYINO TO USE SA-MB DEVICE 

07,3554 

0 0006 1 

♦3 

BXT&ID 



07,3555 

3 0134 1 


DCA 

BOP 2 


07,3556 

53«326 0 


OXCH 

ATICADR 

SAVE PINAL HEmm POR kALCMANs 

07,35 5 7 

3 0006 1 


CA 

BRANk 


07,3560 

7 4716 1 


MA* 

®va4 


07,3561 

27-326 0 


AOS 

ATTCADR +1 


07,35 6 2 

3 0167 1 


CA 

PRIORITY 


07,3563 

7 7674 1 


MAa< 

PRIO 37 


07,3564 

55-327 1 


T3 

ATTPRIO 

SAVE USERS PRIO 

07,3565 

3 3571 1 


CAP 

kalebcoi 

SET ERANK POR KALCMAN 3 

07,3566 

54 003 0 


TS 

ERANK 

07,35 6 7 

0 4574 0 


TC 

POSTJUMP 


07,3570 

44000 1 


CADR 

KALCMAN3 


07,3571 

03261 1 

kalebccn ecadr 

BCDU 
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»U MCDB SOIlOHINa RQUTINBS 


20’35 OCT. 2B,198a SATRAP .007 PAGE 1411 
USBRoS PACE NO. 24 E3 S4 


program DBSCRIPTICW 

IMU STATUS CHECK HDUTINB R02 

MOD NO - 1 

MOD BY - N.BRCBBOR 

punctknal description 


laBROuriNE UTILITY) 


TO CHECK WHETHER IMU IS CK AND IP CN WHETHER IT IS ALiaiBD TO AN 
orientation known by the CMC. TO REQUEST SELBCTICN OP THE APPROPRIATE 
PROGRAM IP THE IMU IS OPP OR NOT ALIGNED TO AN ORIBnATlCN KNOWN BY THE 
CMC. CALLED THROUGH BANKCALL 
CALLING SEOUQICB- 


L TC BANkCALL 

L+1 CADR R02BOIH 

sloroutines called 


VABALAIT4 

PLAOUP 

N0H4AL EXIT MODES 


AT L+2 of calling SEQUB^JE 
ALARM OR ABORT EXIT MODES 
QOTOPOOH, WITH ALARM 
erasable INITIALIZATION REQUIRED 


NONE 

DfflRIS 


CENTHALS-A,Q,L 


0679 





34,3775 




0680 

REP 

1 



07,2000 




0681 





07,357 2 




0682 

REF 

1 







0883 





07,3572 

00063 

1 

0684 

REF 

50 

LAST 

1401 

07,3573 

3 

4676 

1 

0685 

REF 

51 

LAST 

1168 

07,3574 

7 

0077 

0 

0686 

REF 

388 

LAST 

1409 

07,3575 

10 000 

0 

0687 

REF 

2 

LAST 

722 

07,3578 

0 

36 07 

0 

0688 

REF 

63 

LAST 

1406 

07,3577 

3 

1320 

1 

0689 

REF 

37 

LAST 

1405 

07,3600 

7 

4702 

1 

0890 





07,3601 

0 

0006 

1 

0691 





07,3602 

1 

3604 

1 

0692 

REF 

48 

LAST 

1403 

07,3803 

A 

4707 

1 

0693 

REF 

1 



07,3604 

5 

3612 

1 

0694 

REF 

3 

LAST 

853 

07,3605 

0 

5651 

0 

0695 

REF 

70 

LAST 

853 

07,3606 

0 

4106 

1 


bank 34 
®TLOC R02 
BA»C 

COGNT O4/R62 


COUNT* 


51 

BIT13 
STATE +3 
A 

B02ZERO 


ZERO IHJS 


CA IMCDES30 

MAac BIT9 

EXTBTO 
BZP *2 

CS BIT4 

AD OCT220 

TC VARAIARM 


IS iss initialized 


s&ro DAJ ALAIW CCDE 210 
SB® HBFSW AlAEW 




u 
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USERxS PAOB NO. 25 Bs 34 


0700 HEP 52 LAST 1328 07,3607 

0701 HEP 4 LAST 420 07,3810 

0702 HEP 9 last 1397 07,3611 

07025 07,3612 


0 5435 0 H02ZEBO 7C UPPLAO 

00007 0 AOBBS I^O;SE 

1 4570 0 TCP 90HBTURN 

00220 1 OCT220 OCT 220 





u 

L 

mo3 

It0T04 


ROTOS 

ROTOT 

ROTOR 

ROTIO 

ROTll 

R0T12 

R0T13 

R0T16 

R0T19 


AS38^BLE REVISION 249 OP AQC PROtStAM COLOSSUS BY NASA 2021111-041 20’35 OCT. 28,1968 SATRAP .OOT PAOE 1413 

»W MODE SWITCHINO ROUTINES USBR«8 PAOE NO. 26 E3 S4 

PROGRAM DBSCHIPTICK P06 10FEB6T 

TBANSPBR the ISS/CMC FROM THE OPERATE TO THE STANDBY CONDITION. 

TIB NCR4AL CONDITION OP READINESS OP THE GNCS WHEN NOT IN USE IS STANDBY. IN THIS CCNDITICK HB MI 
IBATER POWER IS CN. THE IMU OPERATE POiVER IS OFF. THE CCMPUIER POWER IS ON. THE OPTICS POWffl IS OFF. THE 
CMC STANDBY ON THE WVIN AND LEB DISKY3 IS <N. 


CALLINO SEQlENCB’ 

ASTRONAUT BEOUEST THROUCH DSKY 

subroutines CALLED’ 

OOPBRPl 

BANKCALL 

PIAGDOKN 


V37E oeE. 






L MJ MODS 9»ITQ1UIQ ROTTINES US8IUS PACE NO. 27 *3 S4 

POStO PHESTM© PHBPARB3 PXM SWNDBV BY SNAPaKHTINO THE SCALER AND TIMBl TIME2 

ROSll THE LO» 5 bits OP THE SCALER ARB INSPEOlHJ TO INSURE CCHPATABILITY 

110812 BEIVffiEN THE SCALQl RBAOINO AND THE TI!«l TI1«2 REAOINO. 


08125 

REF 

1 


26.2000 



SBTLOC P05P06 

08126 




26.3655 



BA(6c 


0813 

HEP 

3 

lAST 202 

1150 



EBAl^C: 

: TINE2SAV 

0814 

REF 

1 





COUNT* SJ/P06 

08145 

REF 

53 

LAST 1412 

26,3655 

0 5 435 0 

P06 

TC 

UPPLAO 

08146 

REF 

3 

last 1284 

26.3856 

00054 0 


AORBS 

NOXFLAO 

0815 




26.3657 

0 0004 0 

PHESTAND IWfINT 

0816 




26,3660 

0 0006 1 


bxtb© 

0817 

REF 

31 

last 1386 

26,3661 

3 0025 0 


DCA 

TIMB2 

0818 

REP 

4 

LAST 1414 

26,366 2 

53-151 1 


DXCH 

TIMB2SAV 

0819 

REF 

1 


28,368 3 

0 3714 0 


TC 

SCALPREP 

0820 

REF 

1 


26,3664 

0 3657 0 


IC 

PHESIAND 

0821 

REP 

687 

LAST 1399 

26,3665 

52 155 1 


DXCM 

MPAC 

0822 

US' 

1 


26,3666 

53«153 0 


dkoh 

scalsave 

0823 




26,3687 

0 0004 0 


DHINT 

0824 

REP 

246 

LAST 1037 

26,3670 

0 4555 0 


TC 

BANkCALL 

0825 

REP 

3 

LAST ■ 150 

26,3871 

16777 1 


CADH 

WDREPDR 

0826 

REP 

55 

LAST 1284 

28,3672 

0 5447 0 


TC 

DOWNPIAO 

0827 

REP 

5 

LAST 1412 

26,3673 

00007 0 


AORES 

I>4JSE 

08271 

REP 

56 

last 1414 

28,3674 

0 5447 0 


TC 

DOWNPIAO 

08272 

REP 

5 

LAST 610 

26,3675 

00010 0 


AORES 

WBVZPIO 

0828 

REP 

37 

last 1390 

26,3676 

3 4700 1 


CAP 

BITll 

0829 




26,3677 

0 0006 1 


EXTPND 


0830 

REP 

14 

lAST 1068 

26,3700 

05 013 0 


WQR 

CHAN13 

0831 

REP 101 

LAST 1377 

28,3701 

0 5301 0 


TC 

PHASCHNG 

0832 




26,3702 

07024 0 


OCT 

07024 

0833 




28,3703 

20000 0 


OCT 

20000 

08335 

REP 

2 

last 1414 

1152 



EaANK= 

SCALSAVE 

0834 

REP 

1 


26,3704 

03734 1 


2CADR 

POSTAND 

0834 

REP 

1 


28,3705 

54102 0 




0835 

REP 

1 


26,3706 

3 4731 0 


CAP 

OCT62 

0836 

BEF 247 

LAST 1414 

26,37 07 

0 4555 0 


TC 

bankcau:. 

0837 

REP 

7 

lAST 738 

28,3710 

20751 0 


CADR 

OOPEHPi 

0838 




28,3711 

1 3706 1 


TCP 

-3 

0839 




28,3712 

1 3706 1 


TCP 

-4 

0840 




26,3713 

1 3706 1 


TCP 

-5 

08405 

REP 

9 

LAST 1037 

4731 


OCT52 

EQUALS 

.5SBC 


»T NODOY37 BIT 


aWPSHOT TD«iTI («2 


T1,T2, SCALER NOT CCMPATIBIE 
Tl,T2 and scaler CK 
STORE SCALER 


BEES«M, DRIKT, THACic PLAGS DOAN 


IHISE DOWN 
KffiVZPLO DOWN 


SET STANDBY BMBIE BIT 

set restart TO POSTAND WHEN STANDBY 
HECCVERS 


DEC 50 = OCT 62 


H0841 THE LOW 5 BITS OF THE SCALER READS 10000 FOR THE FIRST INTERVAL AFTER A 
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MJ MODB WITCHINO ROUTINES 

T1 INCrEMEJCT. ip SCALPBBP DeiBOTS THIS INTBRYAL THE Tl,T2 AND SCALER 
MW ABB NOT CXKPAWKE AND RETURN 13 TO L+1 POR ANOTHER RSADINO OP THE 
MTA. OIHBIWISS, THE RETURN IS TO L+2 TO PROCEED. ROUTINE ALSO PREPARES 
the k^AIER BEADINa POR tXKPUTATION OP THE INCSa^n* TO UPDATE TlT2. CTHE 
10 MS bit (BIT 8 > OP THE SCALER IS INCRH^ITED 5 MS OUT OP P HAS3 PR CM 
T1 ) ADDITION OP 5 MS (BIT 5 > TO THE SCALER READING HAS THE BPPBCT OP 
ADJUSTING BIT 6 IN THE SCALER TO BE IN PHASE WITH BIT 1 OP Tl . THE LOP 5 
BITS OP THE SCAIER READING ARE THEM SET TO ZERO, TO TKJNCATB THE SCALER 
MTA TO 10 MS. RESULTS ABE STORED IN MPAC, *1. 


USBRatS PAGE NO. 28 B2 34 


HEP 688 last 1414 
REP 3 LAST 424 

REP 689 LAST 1415 
REP 44 LAST 1396 
BE!P 226 LAST 1402 
BBP 265 LAST 1409 
REP 690 last 1415 
REP 9 last 356 
HEP 691 LAST 1415 
HEP 692 last 1415 
HEP 10 LAST 1415 


REP 389 LAST 1411 
IffiP 693 last 1415 
REP 694 LAST 1415 


,3T14 0 0006 1 

,3T15 22 156 0 

,3T16 0 452T 0 

,371T 0 0003 1 

,3720 52 155 1 

,3721 3 4706 1 

,3722 54 001 1 
,3723 3 4714 1 

,3724 20 155 1 

,3725 4 436 2 0 

,3726 7 0155 1 

,3727 56 155 0 

,3730 7 438 2 0 


28.3731 10 000 0 

26.3732 24 156 0 

28,37 33 0 0156 0 


SCALPRBP 


EXTEND 

CKCH MPAC *2 

TC PINETI* +1 
RELINT 
DXCH MPAC 

CA bits 

TS L 

CA ZERO 

MS MPAC 

CS LOWS 

MAac MPAC *1 

XCH MPAC ♦! 

MAac LOWS 


CCS A 
INCR MPAC +2 

TC MPAC +2 


ADD 5 MS TO THE SCALER READING. 


SET LOP 5 BITS OP ( SCALER+SMS) TO ZERO 
AND STORE RESULTS IN MPAC,+i. 

TEST LOP 5 BITS OP SCALER POR THE PIHST 
INTBHYAL APTER THE Tl INCREMENT 
(NOP = 00000, SINCE BIT 5 ADDED). 

IS IT IST INTERVAL APTER Tl INCR&ENT 

NO 

YES 


POSTAND BECOYERS TIME AFTER SWNDBY.THB SCALER IS SMpaiOnED AND THE 
TIWl TINB2 COLNTER IS SET TO ZERO. THE LOP 5 BITS OP THE SCALER ARE 
inspected to insure COMPATABILITY BETPffiN THE SCALER READING AND THE 
clearing OP THE TIME CCUNTER. IT THEN COMPUTES THE DIFFERENCE IN SCALER 
VALUES (IN DP) AND ADDS THIS TO THE PREVIOUSLY SNAPSHOITED VALUES OP 
TIf«l TI!«2 and PLAGES THIS NEW TIFE INTO THE TIFEl TI*2 CCXNTBR. 


REP 38 last 1414 


REP 266 
REP 227 
REP 32 
REP 2 
REP 2 


LAST 1415 
LAST 1415 
LAST 1414 
LAST 1414 
LAST 1414 


BBP 3 LAST 1414 
REP 695 LAST 1415 


,3734 4 4700 0 

,3735 0 0006 1 

,3736 03 013 0 

,3737 0 0004 0 

,3740 3 4714 1 

,3741 54 001 1 

,3742 52 025 1 
,3743 0 3714 0 

,3744 0 3737 1 

,3745 0 0006 1 

,3746 4 115 3 0 

,3747 20 155 1 


CCum M^05 

CS BITll 
EXTFND 

WAND CHAN13 
INHINT 


CA ZERO 

TS L 

DXCH TIi«2 

TC SCALPREP 

TC POSTVAND +3 

EXTEND 

DCS SCALSAVE 

MS MPAC 


RECOVER TI)« AFTER STANDBY. 
CLEAR STANDBY ENAflIE BIT 


CLEAR TI!«lTIMBz 
STORE SCAIER IN MPAC, MPAC+i 
T1,T2, SCAIER NOT CCMPATIBIE 
•n,T2 AND SCAIER CK 

FORM DP DIFFERENCE OP POSTSTANDBY SCAIER 


20*35 OCT. 28,1968 SATOAP .OOT ■ PAGE 1416 
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L 

B«i WDB sriiQtiNa routines 





USERaiS PAGE NO. 29 B2 S4 

0888 

HP 48 

1>ST 1403 

28,3750 

3 4701 

0 

CAP 

bitio 

MINUS PRBSTANDBY SCALER AND ailFT RIGHT 

0889 

HEP 9 

lASr 374 

26,3751 

0 7256 

1 

TC 

aiOKlMP 

5 TO ALIGN BITS WITH TI^«lTI^e2. 

0890 

HEP 28T 

last 1415 

28,3752 

3 4714 

1 

CAP 

2ERO 


0891 

HEP 898 

LAST 1415 

28,3753 

54 156 

1 

TS 

MPAC +2 

NEHIED FOR TP ACBIEB 

0892 

HP 12 

LAST 1398 

26,3754 

0 7226 

0 

7C 

TPAffllBB 

make dp DIPP AOHEE 

0893 

HEP 89T 

LAST 1416 

26,3755 

10 154 

0 

CCS 

MPAC 


0894 

HEP 1 


28,3756 

0 3703 

0 

TC 

POSICM 

IP DP DIPP NET ♦, NO SCALER CVBRPLCW 

0895 

REP 2 

last 1416 

28,3757 

0 3763 

0 

TC 

POSTCCM 

BETWEB4 PRE AND POST STANDBY. 

0898 



26,3760 

0 3761 

1 

TC 

*1 

IP DP DIPP NET SCALER CX/ERPLO»ED. ADO 

089T 

HP 4T 

LAST 1416 

26,3761 

3 4701 

0 

CAP 

bitio 

bit 10 TO HIGH DIPP TO CORRECT. 

0898 

HEP 898 

lASr 1416 

26,3762 

26 154 

0 

AOS 

MPAC 


0899 



26,3763 

0 0006 

1 

posTCCM Exieai 


CtMPAC,+i) IS WGNIUDE OP DELTA SCALER. 

0900 

HP S 

last 1414 

26,3764 

3 1151 

0 

OCA 

TIME23AV 

PRESTANDBY TU«lTDe2 

0901 

HHE 899 

last 1416 

28,3765 

20 155 

1 

DAS 

MPAC 


0902 

HEP 13 

last 1416 

26,3766 

0 7226 

0 

TC 

TPAfflSE 

POBCE SIGN AGHEE^»r^ 

0903 

HEP TOO 

LAST 1416 

28,3767 

52 155 

1 

DKCH 

MPAC 

updated VALLE POR T1,T2. 

0904 

REP 33 

last 1415 

28,3770 

20 025 

1 

DAS 

TI!«2 

LOAD UPDATED VAUB INTO Tl,T2, WITH 

09045 

HEP 5T 

LAST 1414 

26,3771 

0 5447 

0 

TC 

DCWNPLAQ 

CLEAR NCDOPIAO 

09048 

BBP 4 

last 1414 

28,3772 

00054 

0 

ACRES 

NODOFLAO 


0905 

HP T1 

LAST 1411 

26,3773 

0 4106 

1 

TC 

QOTOPOCH 
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L. 

KEYROPT, 

UPBWT 






0001 




14,3744 



bank 

14 

0002 

RES' 

1 


07.2000 



»IU3C KBYaiPT 

0003 




•7.3813 



bank 


0004 

REE 

1 





cam* os/KEYUP 

0005 

REE 

25 

LAST 1202 

07,3613 

54 018 1 

KEYaiPTl 

TS 

bankrupt 

9008 

REE 

328 

LAST 1408 

07.3814 

58 002 0 


XQi 

0 

0007 

BEE 

20 

LAST 1202 

07,3815 

54 012 0 


TS 

ORUPT 

0008 

BEE 

2 

lAST 350 

07,3818 

0 4414 1 


IC 

LCDSAMPT 

0009 

BEE 

11 

LAST 1415 

07,3817 

3 4382 1 


CAE 

LOOS 

0010 




07,3820 

0 0006 1 


EXTB® 


0011 

BEE 

2 

LAST 185 

07,3821 

02 015 1 


BAND 

WIKEYIN 

0012 

BEE 

8 

LAST 1379 

07,3822 

54 073 1 

keyco« 

TS 

RJP1SBG4 

.0013 

BEE 

14 

LAST 854 

07,3823 

4 0101 0 


CS 

PLAOOFDS 

0014 

BEE 

53 

lAST 1398 

07,3824 

7 4874 1 


MASK 

BIT15 

0015 

BEE 

15 

LAST 1417 

07,3825 

28 101 0 


ADS 

PLAOWBDs 

0018 

REE 

8 

LAST 1174 

07,3828 

3 4371 0 

ACCEPTUP 

CAE 

CHBPRIO 

0017 

BEE 

33 

LAST 1387 

07,3827 

0 5027 1 


7C 

NCVAC 

0018 

REE 

88 

LAST 370 

0777 



EBANK: 

DSPCCUNT 

0019 

REE 

1 


07,3830 

02000 0 


2CADB 

charin 

0019 

REE 

1 


07,3831 

80101 1 




0020 

REE 

7 

LAST 1417 

07,3832 

3 0073 0 


CA 

«JPTREG4 

0021 

BEE 

24 

LAST 1407 

07,3833 

50 084 0 


IM3BX 

LOCCTH 

0022 

BE3> 701 

LAST 1418 

07,3834 

54 154 0 


TS 

MPAC 

0023 

BEE 

48 

LAST 1089 

07,3835 

0 5222 0 


7C 

BBSlWE 
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TI* IS SWICHHI IN OJPT FOR HDUN 65. 
CHECK IE KEYS SM-lM CN 

(NOTE’ tUPTHBOA = KBYTEMPi) 

LEAVE 5 bit KEY CDE IN MPAC FOR CKARIN 


ill 
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KBYHUPT, UPHOPT 


P0024 mtUPT PROORAM 


0025 

0020 

002T 

0028 

0029 

0030 

0031 

0032 

0033 

0034 

0035 
0030 

0037 

0038 

0039 

0040 

0041 

0042 

0043 

0044 

0045 
0048 

0047 

0048 

0049 


BBF 28 
REP 329 
REF 21 
REF 3 
REF 208 
REF 2 
REF 2 
REF 34 

REF 34 
REF 12 
REF 3 
REF 4 

REF 48 
REF 1 
REF 13 
REF 1 
REF 1 
REF 49 

REP 2 
REP 14 


tAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 

LAST 


1417 

1417 

1417 

1417 

1418 
188 
128 

1383 


last 1406 
last 1417 
last 1418 
last 1418 

LAST 1416 

last 1418 

last 1418 

LAST 1418 
last 1418 


REF 2 LAST 1418 


07.3636 

07.3637 

07.3640 

07.3641 

07.3642 

07.3643 

07.3644 

07.3645 

07.3646 

07.3647 

07.3650 

07.3651 

07.3652 

07.3653 

07.3854 

07.3855 
07,3656 
07,3857 
07,3660 
07,3861 
07,36 6 2 
07,366 3 
07,3864 
07,36 65 
07,3666 


54 016 
56 002 
54 012 
0 4414 
3 4714 
56 045 
54 073 
3 4710 
0 0006 
05 011 
3 4362 1 
7 0073 1 
56 073 0 
0 0006 1 


UPtUPT 


UPHPTl 


7 4701 
54 734 
7 4382 
3713 
3710 
4701 
0006 
0734 
4362 
0000 
3710 


TS 

XCH 

TS 

TC 

CAP 

XCM 

TS 

CAP 

Exiero 

WOR 

CAP 

mask 

XCH 

Exiaro 

HP 

TS 

mask 

AD 

TC 

CAP 

EXTEND 

HP 

MASK 

CCM 

TC 


BIANKHUPT 

o 

QOJPT 

LCDSAMPT 

ZERO 

INLINK 

KByTB4Pl 

BIT3 

DSAimjT 

LOWS 

KEYTH^Pi 

KEYTH4P1 

BlTlo 

KBYTB4P2 

LQ»5 

HIlO 

UPTEST 

BITlO 

KBYTEMP2 

LOWS 

UPTEST 


0050 

REP 

1 


07,38 6 7 

4 3716 

0 

UPCK 

CS 

ELHCCDE 

0051 

REP 

5 

(AST 1418 

07,3670 

6 0073 

0 


AO 

KEYTSMPI 

6052 




07,3671 

0 0006 

1 


EXTB® 

0053 


1 


07,3872 

1 3700 

1 


BzF 

CLUPLOCK 

0054 

RBP 

49 

LAST 1411 

07,3673 

3 4707 

0 


CAP 

BIT4 

0055 

REP 

19 

LAST 777 

07,3674 

7 Ol03 

1 


mask 

PLAOiirRD7 

0056 

REF 

390 

last 1415 

07,36 75 

10 000 

0 


CCS 

A 

0057 

REF 

♦9 

last 1417 

07,3676 

0 5222 

0 


TC 

HESU6E 

0058 

REF 

1 


07,3877 

0 3626 

0 


TC 

ACCEPTUP 

0059 

REF 

SO 

last 1418 

07,3700 

4 4707 

1 

CLUPIXPc cs 

BIT4 

0060 

REP 

20 

last 1418 

07,3701 

7 0103 

1 


mask 

FLAGWHD7 

0061 

REP 

21 

last 1418 

07,3702 

54 103 

1 


TS 

FIAGWRD7 

0062 

HEP 

2 

last 1418 

07,3703 

0 3626 

0 


TC 

ACCEprjp 

A0063 










0064 

REP 

22 

LAST 1418 

07,3704 

4 0103 

1 

IMPAILz 

CS 

FLA(S»RD7 

0065 

REP 

51 

LAST 1418 

07,3705 

7 4707 

1 


mask 

BIT4 

0066 

REP 

23 

last 1418 

07,3706 

26 103 

1 


ADS 

FLAGWHD7 

0067 

REP 

50 

LAST 1418 

07,3707 

0 5222 

0 


TC 

REajLB 

0069 

REP 

6 

LAST 1418 

07,3710 

6 0073 

0 

UPTEST 

AD 

KEYKMPi 
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TIME IS aiAlQlH) IN BUPT FOB NOUN 65 . 


TUIN CN UPACT LIGHT 
<BIT 3 OP CHANNEL n) 

TEST FOB TRIPLE CHAR REDUNDANCY 

LO»s OP WORD 

LOWS INTO kEYTEMPi 

9IIFT RIGHT 5 

MID 5 


SHIFT HiaiT S 
Hiai s 


CODE IS GOOD. IP CODE = -ERROR RESET-, 

clear uplockflcsbt bit 4 op FLACWRDt = 0) 
IP CODE DOES NOT = -ERROR RESET-, ACCEPT 
CODE CNLY IF UPLOCkFT, IS CLEAR (=o). 


TEST UPLOCKFL FOR 0 OR 1 . 


UPLOCkPL = 1 
UPLOCKFL = 0 

CLEAR UPLOCKPL (I.E., SET BIT4 OP 
FLAGwhDt = 0) 


CODE IS rad 

LOCK arr puriher iflink activity 

(BY SETTING UPIXXKPT- = D UNTIL 
-error RESET. IS SENT VIA UPl.INK. 
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KBXajPr. UPHUPT 


USBB«S PAOB NO. 3 Bo S4 


0070 

REP 391 

lAsr 1418 

07,3711 

10 000 0 


CCS 

A 

0071 

REP 1 


07,3712 

0 3704 1 


TC 

•BWAIL2 

0072 



07,3713 

77740 1 

HIlO 

OCT 

TIT40 

0073 

RE5F 2 

LAST 1419 

07,3714 

0 3704 1 


TC 

T)«IL2 

0074 

HEP 330 

1>3T 1418 

07,3715 

0 0002 0 


TC 

O 

0075 



07,3716 

00022 1 

elrcode 

OCT 

22 


lAlPLItOC activity light- is lUIWHO OPP BY 

1 . VBHBLDSP 

2 . ERROR RB^ 

3. update PROaRAM(P27) atTERBO BY VT0.V71.VT2,AND V73. 


THE RECEPTION CF A BAD CODE! I. B CCC PAILURBl LOGICS CUT FURTHER UPLINK ACTIVITY BY SETTING BIT4 OF PLAOWRDr = 
THIS INDICATION WILL BE TRANSFERRED TO THE GROUND BY THE DOWNLINK WHIOI DOWNLINKS ALL FLAC»ORDS. 

WBN UPLI«C activity IS LOCKED OUT .IT CAN BE ALLOwHl WHEN THE GROUND UPLINKS AND .^IROR RBSETV CODE. 

(IT IS BECOHBiDBD THAT THE -ERROR LIGHT RESET. CCDE IS PRECEEDBD BY 16 BITS THE FIRST OP WHIGH IS 1 FOLLOWED 
BY 15 ZEROES. THIS WILL ELIMINATE EXTRANEOUS BITS FHCM INLINK V(HICH MAY HAVE BEEN LEFT (VEH FRCM THE ORIGINAL 
FAILURE) 

UPLUWC activity IS ALSO ALLOWED! UNLOCKED) DURING FRBai START WHEN FRESH START SETS BIT4 OF FLAGIWHDt = 0. 
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L DISPLAY INTSBPAIS ftOUTINES USRaS PAGE NO. 1 Bo S4 

■0001 DISPLAYS CAN BB CLASSIPIED INTO THE POUUWINO CAOBOOBIES- 

■0002 1. PRIORITY DISPLAYS- DISPLAYS WHICH TAKE PRIORITY OVER ALL ODffiR DISPLAYS. USUALLY THESE DISPLAYS ARE SENT 

■0004 otrr i*o)br critical alarm conditicns. 

B0005 2. EXlBOieD VEIO DISPLAYS- ALL E)Cim»D VERBS AND MIRC ROUTINES SHOULD USE EJCIENDED VERB CMIBK) DISPLAYS. 

■OOOT 3. NOieiAL DISPLAYS- ALL MISSION PROOBAM DISPLAYS WHICH INTERFACE WITH THE ASTRCNAUT DURING THE NORMAL 

R0009 SEOLBICB OP EVBITS. 

■0010 4. MISC. DISPLAYS- AIL DISPLAYS NOT HANDLED BY THE DISPLAY DnEBPACEROUTINES. THESE INCLLDE SUCH DISPLAYS AS 

■0012 DISPLAYS AM) SPECIAL PURPOSE DISPLAYS HANDLH) BY PINBALL. 

■0013 5. astronaut INITIATED DISPLAYS- ALL DISPLAYS INITIATED EXTERNALLY. 

■0014 HE FOLLOWING TERMS ARB USED TO DESCRIBE THE STATUS OP DISPLAYS- 


■0015 1. ACTIVE-THE display which is ( 1) BEING DISPLAYED TO THE ASTRONAUT AND WAITING FOR A RESPCNSB OR 

■OOIT <2 > WAITIMJ first IN LINE FOR THE ASTRONAUT TO FINISH USING THE DacY OR (3) BEING DISPLAYED CN THE DSKY 

■0019 Bur NOT waiting FOR A RESPCHSE. 

■0020 2. inactive -A DISPLAY WHICH HAS (1) BEBI ACTIVE BUT WAS INTBRRUPTHJBY A DISPLAY OP HKHER PRIORITY, 

■0022 (2 ) BEEM put into THE WAITING LIST AT TI!« IT WAS REQUESTED DL* TO THE FACT A HKHER PRIORITY DISPLAY 

■0024 WAS ALREADY GOING, <3) BEB( INTERHUPTH) BY THE ASTRCNAUT CCALLED A PINBRANCH CCNDITICN, SINCE THIS TYPE 

■0028 OP inactive DISPLAY IS USUALLY REACTIVATED CHLY BY PINBALL) OB ( 4) A DISPLAY WHICH HAS FINISHED Bur STILL 

■0028 HAS INFO SAVED FOR RESTART PURPOSES. 

■0029 DISPLAY PRIORITIES WORK AS FOLLOWS- 


■0030 INTERBUPTS- 

■0031 1 . THE ASTRCKAur CAN INTERRUPT ANY DISPLAY WITH AN EXTEIHAL DISPLAY BEQUEST. 

■0033 2. INTEIWL DISPLAYS CAN NOT BE SENT OUT WH04 THE ASTRONAUT IS USING THE DSKY. 

■0035 - 3. PRICRITY DISPLAYS INTERRUPT ALL OIHBR TYPES CF INTEIHAL DISPLAYS. A PRIORITY DISPLAY INTERRUPTING ANOIHER 

■0037 PRIORITY DISPLAY WILL CAUSE AN ABORT UNLESS BITT4 IS SET FOR THE LINUS ROUTINE. 

■0039 4. A MABC DISPLAY INTERRUPTS ANY NOEWL DISPLAY. 

■0040 5. A marc that INTERRUPTS A MARC COMPLETELY REPLACES IT. 


■0041 ORDER OP WAITING DISPLAYS- 
■0042 1 . astronaut EXTERNAL USE 

■0043 2. PRIORITY 

■0044 3. INTEHHUPTBD MARC 

■0045 4. INTEBaiPTED NORMAL 



■0046 5. marc TO BE REOESTED (SEE DESCRIPTION OF ENEMARC) 

■0047 6 . marc waiting 

■0048 7. NOEMAL waiting 
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P0049 W DISPLAY ROUTINES ARE INTSWDBD TO SEIWB AS AN INTEHPACE fflnvBEN THE USER AND PI®^- JHE 

ROOSl FOUjOHINO SDWeam can be mw* about noiwal displays and prkxuty displays (A dbscriptkw op mark rcutines 

R0053 BILL POLUNT LATER) » 

1 ALL ROUTINES THAT END IN R HAVE AN IhMEDIATE RBTOIW TO THE USER. FOR ALL PLAalINO DISPLAYS THIS RETURN 
M056 IS TO Hffi users CALL CADR » 4. FOR THE ONLY NCN PLAaiINO I)*«DIATE RETURN DISPLAY (GQDSPR) THIS RETURN 

BflOSB IS TO THE users CALLING LOG ♦!. 

Roosa 2 all routines not ENDma IN R DO NOT DO AN I»«DIATE RETUIW TO THE USER. 

MOBl s' ALL ROUTINES THAT END IN R START A SEPARATE JCB (MAkEPLAY) WITH USERS JOB PRIORITY. 

M063 4. all routines NOT ENDING IN R »1ANCH DIRECTLY TO MAkEPLAY WHICH MAKES THESE DISPLAYS A PART OP THE 

R0065 users job. 

Rooes 5 ALL DISPLAY ROUTINES Are CALLED VIA BANkCALL. 

MOOT ». TO restart A DISPLAY THE USSR WILL GENERALLY USB A PHASE OP CNE WITH DESIRED RESTART QROJP (SEE 

AL?SASm°DIS^TmvE 3 RETURNS TO THE USER FRCM ASTRCNAUT RESPCHSES. A TERMINATE (V34) 

M0T2 TO THE USERS CALL CADR ♦!. A PROCEED (V33) BRANCHES TO THE USERS CALL CADR *2. AN ENTER OR RECYCLE 

t)OOT* ‘V32) branches TO THE USERS CALL CADR +3. 

HOOTS 8. all routines HIST BB USED IHDBR EXECUTIVE COITROL. 


M0T8 A DESCRIPTION OP EACH ROUTINE WITH AN EXAMPLE FOLQIS' 

MOTT OCDSP IS USED TO DISPLAY A VERB NOUN ARRIVING IN A. NO RETUTOI IS MADE TO THE USER. 
M0T9 1 - (WDSP IS NOT RBSTARTABLE 


A0089 

RO090 GOPLASI DISPLAYS A PIASHINO VERF 
M092 THE ASTRCNAUT (SEE NO, T ABCVE) . 


CAP 

VXXNYY 

TC 

BANKCALL 

CADR 

OCDSP 

VXXNYY OCT 

OXXYY 

RBTUre» IS TO THE USER. 


CAP 

VXXNYY 

IC 

BANKCALL 

CADR 

GCDSPR 

NCUN WITH NO 1M«DIATE 

RETURN TC 

CAF 

VXXNYY 

TC 

BANKCALL 

CADR 

GOPLAai 


!.. 


IM«DIATE RETURN OP GOISPR 


VXX NYY WILL BE A FLAadNG VERB NOUN. 


tefminate return 

PROCEED RETURN 

©TIER OR RECYCIE RETURN 


B0099 GOPBRPl IS ENTERED WITH DESIRED CHECKLIST VALUE IN A. GOPERPl WIU, DISPIAY THIS VAIUE IN Rl BY MEA.NS OP A 


I 




II 
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ROlOl 

ROlOa 


PBHTOHM 04 CHECKLIST ( V50 N25» IS THEN DISPIAYED. NO IM4EDIA1E RETURN IS HADE TO 


R0104 OOPERPi BLANKS REOISTEHS R2 AND R3 


AOIOS 

A0IO6 

A0107 

AOIO8 

A0109 

AOllO 

Rom 

R0113 

Rons 


CAP 

1C 

CADR 


octxx 

BANKCALL 

OOPERPi 


CODE POR CHECKLIST VALUE XX 


teiwinate RBiuroi 
PROCEED RETURN 
B4TBR RETUKL 


R^E^^N^S^Ji^ ‘ ® OOPEBPZ will FIRST DISPIAY THE 

^ * VOlNYY CH A VOONYY. PLEASE PERFORM CN NCUN (V50 NYY) THB4 BECOES A FIASHINO 
DISPLAY. NO IM«)IATE RETURN IS MADE TO THE USER (SEE NO. 7 ABCVE) . 


R0116 OOPBHP2 DOES NOT BLANK ANY HEGISTBRS 


A0117 

A01I8 

A0119 

A012O 

A0121 

A0122 

.10123 

R0125 

R0127 


CAP 

IC 

CADR 


VXXNYY 

BAfOcCALL 

OOPBHF2 


VARIABLE NCUN YY. XX=00 OR oi. 


TE BNINA TE HETUIN 
PROCEED RBTUIN 

enter return 


DI^Ys’^I^ ^ NlPfiBR. the desired PROGRAM NO. IS ENTERED IN A. GOPERP 3 


B0128 GOPBRP3 blanks registers R2 AND R 3 


A0129 

A0130 

A0131 

A0132 

A0133 

A0134 

R0135 

R013T 

R0139 

A0I40 

A0141 

A0142 

A0143 

A0144 

A0145 


R0146 GOPERF4 BI.ANKS REGISTER R3 


CAP 

TC 

CADR 


DECxx 

BA»(CALL 

OQPERF3 


REQUEST PERFORM CN PXX 


terminate return 

PROCEED RETURN 

hnteh return 


# 


Sew! dinpSn'^ opticn. the desired optich isentehhj in a and stored in OPTICNI. 

M^ATO T t TOLLCVfED BY A FlAaiING V50N06 FOR A PIPvASE PERFORM. NO 

(MEDIATE RETURN IS MADE TO THE USER (SEE NO. 7 ABCVE). 


CAP 

TC 

CADR 


OCTXX 

BANKCALL 

(X)PERF 4 


request perform on opticn XX 


terminate RBUniN 

PROCEED RETURN 

enter return 
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DISPLAY IKIERPAQB ROIITINES 


USBIUS PAGE NO. 4 BO 34 


OroSPRET IS USHl TO DISPWY A VERB NOW ARRIVING IN A WITH A HETOIW TO TOB USER AFTER THE DISPIAY HAS BEEN SENT 
OUT. 


CAF VXXNYY 
TO BANKCAU, 
CAffil OODSPRET 


RETURN TO USER 


regodsp is usro to dispiay a verb noun arriving in a. hboodsp is the same as ocdsp oily regodsp replaces any 

ACTIVE normal DISPLAY IF CNE WAS ACTIVE. 


CAF VXXNYY 

TO BANKCALL 

CADR REGODSP 


REFLAai IS THE SA* AS GQPLAal (NLY REFlAal HEPIACES ANY ACTIVE NORMAL DISPLAY IF WE WAS ACTIVE. 


CAF VXXNYY 

TO BANkCALL 

CADR REFLAai 


VXX NYY WILL BE A FLASHING VE^ NOUN 


TEIMINATE RETUrei 
-PROCSED RETURN 

biter return 


GOFLASHR IS SA.'<E AS GOFLAai WLY AN IJ-MDIATE HETUKI IS MADE TO THE USERS CAU, CADR +4 . 


CAF VXXNYY 

TO BANKCALL 

CADR GOPLAaiR 


teiwinate return 
proceed return 

BITER OB RECYCIE RETURN 


IM«DIATE return from GOPLAam 


OOPBRFiR IS THE SAi« AS GOPERFl WLY GOPERFlR HAS AN KWEDIATE REIUIW TOjSIRS CAU, CADR +4. 


OOPERFlB blanks REGISTERS R2 AND R3 


CAF OCTXX 

TO BANKCALL 

CADR GOPERFlR 


CODE FOR CHECkI,IST vAU® XX. 


terminate return 

PBOCEFD RETURN 

biter return 


I»«)IATE RETURN FROM GOPERFlR 


OOPEBF2R IS THE SA» AS GOPERFz WLY AN IMMEDIATE RETURN IS MADE TO USERS CAU, CADR +4. 


I 
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DISPLAY DriEHFACB HOOTINES 


imus PAOB NO. 


oopbrp2« dobs not blank any RBQISIBRS 


CAP VXXNYY 

IC BANKCALL 

CADR OOPBKP2a 


VARIABLE NOlU YY BEOUESIHI. XX=00 OR 01 


teiwinate return 

PROCEHO HEIUIW 
BNTBR HEIUIW 


»*«DIATE REIUHN HEBE PRCM aOPERF2H 


OOPEHPaR IS THE SAME As OOPERP3 ONLY AN BEIUIN IS HIDE TO USERS CALL CADR +4. 


O0PBRP3R BLANKS RBOISTERS R2 AND R3 


CAP PROOXX 

IC BANkCALL 

CADR OOPERP3R 


PEHPOK4 PROGRAM XX 


TEIWINATE RETURN 
PROCEED RETURN 
BOER RETUIW 


oopERFsH Mediately returns here 


OOPBIPaB is the SA.VE As GOPERF4 CNLY an C+HJIATE RBTUIN is made to users call CADR + 4. 


CAP OCTXX 

1C BANKCALL 

CADR aOPEBE4R 


request PERPOiW CN OPTICNXX 


TEIWINATE RETURN 
PROCEED RETURN 

bnter return 


»*«DIATB RETURN TO USER 




G0pa«P4R BLANKS REGISTER R3 


BEFLAaiR IS THE SA.-* AS RBPLASI CNLY AN IM«DIATB RETURN IS MADE TO THE USERS CAIX, CADR +4. 


CAP VXXNYY 

TC BANKCALL 

CADR RBPLASHR 


VXX NYY WILL BE A PLAaiINO VERB NOUN 


teiwinate return 

PROCEED BETlmN 

biter return 


I^^eDIATE RETURN TO USER 


BEOODSPR is the SA>f? AS REGODSP CNLY A RElURN (IM«DIATE) IS MADE TO THE USER. 






u 


AaS&BLB 

DISPLAY 




A0228 

A0229 

A0230 

A0231 


ISION 249 OP AOC PBOIaAM COLOSSUS BY NASA 2021111-041 
INIERPACB ROUriNBS 

CAP VXXNYY 

1C BA^«CALL 

CADS RBOCSSPR 
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WeaiATB BBTOIW TO USER 
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DTSPMY INTEHPACB ROUTINES 


U^US PACE NO. 


OCMAIK IS USED TO DISPLAY A MABC VERB NOIK ARRIvINO IN A. NO RETURN IS »«» TO THE USER. 
OOCDSP = OOHnc 


CAP VXXNYY 

TC BAMcCALL 

CAOR OCMARc 


OCMARKR IS THE SMB AS OCMABC (NLY RBIUIW IS TO THE USER. 
OCKDSPR = OCMAnoi 


VXXNYY CCNTAINS VERB AND NOUN 
CHHER EXTENDED VERBS USE CADH OCXDSP 


CAP VXXNYY 

TC BANKCALL 

CADR OCMlnoi OIHBR EXTETOED verbs USE CADH OCJcDSPR 

MHIIATE RETUm OP OCKAiKH 

TO immediate return to the user. 3 returns are possible PRa4 

OOCDSPP = GCMARcP 


CAP VXXNYY 

TC BANKCALL 

CADR OCMARCP 


VXXNYY WILL BE A FLASHING MARC VERB NOUN 

OTHER EXTENDED VERBS USB CADR GOXDSPP 
TEIMINATE RBTUWI 
PROCEED RBTUrei 

biter or recycle return 


OCMARCPR IS THE SA.'C AS OCMARcP (HLY AN W40DIATE RETURN IS MADE TO THE USER CALL CADR +4. 


OOXDSPPR = GCMARkPH 


CAP VXXNYY PLASHING MA«( VERB NON 

TC BANKCAU. 

CADR OCMARCFR OTHER EXTENDPD VERBS USE CADR GCKDSPFH 

terminate return 

PROOBH) RETIOTI 

biter OR RECYCLE RETIOTI 

DtMlIATE RETURN TO THE USER 

^ PLEASE PBRPCSM (H A MAB< REQUEST WITH CNLY 1 ASTRCNAUT RETURN TO THE USER NO I,VL«DIATE 
®I^ IS MADE. THE DESIRED MARC PLEASE PERFORM VERB AND DESIRED NCUN ISENTERED IN A. GO-lAHKl DISPLAYS Rl R2 R 
TOLLQVED BY A FIASIING V5XNYY FOR A Pl£ASE PERFORH. THE ASTRCNAUT WILL RESPCND WITH A MARK 
OH mark reject OR AN BITER. THE BITER IS THE CNLY ASTRCNAUT RESPCNSE THAT WILL CCME BACK TO THE USER. 




CAP V5XNYY 

TC BANKCALl. 


X=l,2,3,4 Y= NOJN 
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oisrtAY’ ihtbrpacs Houriires 


UaSEUS PAOB NO. 8 


CUB aOMRCl 


BnBR FBTUIW 


nm ♦** O' KAtOClNG CesIRED ON NON R ROCTINES, NOTIPY DISPLAYBR. 


CAP VSXNW 

TP MMCCALI. 

CAOR GtMAnciR 


ASTRONAUT BflER RBIURN 
D*BDIATB RBmW TO USER 


„« ««« <»««<. «t.Y 3 »m»3 


CAP V5XNYY 
1C BAWCALL 
CAOR OMAIKR 


nn2 ao»AMC2R IS THE SA>e AS GCMARKlR ONLY 3 ASTRCNAUT MHUHNS ARE MADE TO THE USER. 


TEtMINATE HETUIW 
PROCEED RBIUiei 
(NTBR HETUW 


CAP VSXNYY X=0,l,2.3,4 YYrNOn 

fC BAlACCALL 
CAOR aCHA«C2R 

*0298 TEIWINATE RETURN 

A029T PROCEED HBIUWI 

*0298 ENTER RETURN 

A0299 

IM«DIATE HEIUIN TO THE USER 

AOSOO 

....rt A oriAAcfA DPPPTWVI fw A MARic REQUEST WITH A 3 COfP. DEC DISPLAY. THE DESIRED MARK PLEASE 

^ aT^t^ Z ^S^3^rs™. rI. R3 by ^eans op a ^ 

VSXNYY P^ PLEASE PERFORM. G(MA«C3 HAS 3 ASTRONAUT RETURNS TO THE USER WITH NO LM«DIATB RETURN. 


CAP VSXNYY 

IC HAJWCCALL 

CADR 004419(3 


X=l, 2,3.4 YYrNCUN 


terminate reiurn 

PRCtEED RETURN 

enter return 


II0313 GQAAmJ is THE SAi« AS <XMARK3 ONLY R2 AND R3 ARE BUANKED A(® Rl IS DISPLAYED IN OCTAL. 


CAP VSXNYY 

•IC BAIWCCAU. 

CAOR 0O4AI9C4 


X=1.2,3,4 YY=Na)N 


terninate reiurn 

PROCEED RETURN 


11 

L 

A0320 


80321 

80323 

80324 

80325 

80326 

8032T 

80328 

80330 

80331 

80332 

80333 

80334 

80336 

80337 

80338 

80339 

80340 

80341 

80343 

80344 

80345 

80346 

80348 

80349 

80351 

80352 

80353 

80355 

80356 

80357 

80358 

80359 

80360 
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Display miERPACspoariNEs imus pa« no. 9 80 S 4 

• • • • • • EH ’ifiH 

^P^ IS USED TO Dlspwy A VERB NOW ARRIVING IN 8 WITH A HETORN MADE TO THE USER AElER THE 0 ISPWY HAS BEBI 




CAE VXXNW 

1C BAJOcCMU. 

CADR OOSPRET 


BBTUIN TO user 


DISPLAYS (ACTIVE AND INACTIVE,. A BEIUBI ,3 HIDE TO THE USER AEIER THE MARK DISPI8YS 

1C bankcall 
CADR KLEBreY 

BBTUIN TO USER ‘ 

MARgBRAN IS A SPECIAL PURPOSE HO/riNE USED FOR SAVING JOB VAC AREAS (SEE DEsCriptKX CE MAMGBrAN BBL0») . 

ic bankcmll 

CIADR MARgBRAN 

bad REIURN if MARG display not ACTIVE 

((3(KD RETURN TO IMMEDIATE REIURN LCC OP 
18ST PLASHING MARK R ROuriNB, 

IC POSTAJMP 

CADR PINBRNCH 

^°ASTBONAW^^NO TaB^ DISPWY. it will DISPLAY A GOFIASH TYPE DISPIAY WITH THREE POSSIBLE RETURNS FRCM 

^ PRIODSP IS TO REPIACE THE PRESENT DISPIAY WITH A DISPIAY OF HI(3(ER PRIORITY AND TO 
PRCVIDE A MEANS FW RESTORING THE OI) DISPLAY WHBN THE PRIORITY DISPIAY 
IS i®SPCNDED TO BY Tl* ASTRCKAur. 

PRIO ^PLA?*™ DISPLAY IS RESTORED BY AN AuTOlATIC BRANCH TO WAkE UP THE DISPLAY THAT WAS INTERRUPTED BY THE 


CAP VXXNYY 

TC BANKCALL 

CADR PRIODSP 


VXXNYY Will. BE A FLASHING VERB NOUN 




TEIWINATE RETURN 
PROCEED RETURN 
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A0381 «nBR OR RECYCLE RETURN 

R0362 PRIODSPR IS THE SANE AS PRICDSPONLY AN M«DMTB RETURN IS MADE TO THE USERS CALL CADR +4. 


CAP VXXNYY 

1C BANKCALL 

CAOR PRICDSPR 


VXXNYY WILL BE A PLASHINO VERB NOUN 


A036T ..i ... 1EIMINATE REIUIW 

A0368‘ - - • .... PROCEED RETURN 

A0389 eWTBH OR RECYCLE RETURN 

A03T0 ...... IIW®DIA*K RETURN 

R03T1 PRIOLAHM DCES A V05N09 PRIODSPR. 

R03T2 OEANDSP CLEANS OUT ALL NOfMAL DISHVIYS (ACTIVE AND INACTIVE) . A RETURN IS MADE TO THE USER AFTER NORMAL 
R03T4 DISPLAYS ARE CLEANED OLrT. 

A0375 1® BANKCALL 

A0375 CADR CLEANDSP 

AniTT ... ... HETUIW TO USER 
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DISPIAY INTBRPACS ROUTINES UffiRacS PACE NO. n BO 34 

P0378 CB«HAL INPOHMATICN 

R03T9 

R0380 alarm or ABORT EXIT MODES— 

*0381 PRIOBORT IC ABORT 

*0382 OCT 1502 

B0383 PRIOBORT IS BRANCH) TO WHEN (i) A NORMAL DISPLAY IS HEOUBSTSD AND ANOTHER NOR4AL DISPLAY IS ALREADY ACTIVE 
R038S (REPLAai AND RBOCDSP ARE ExCEPTICNS) OR ( 2 ) A PRIORITY DISPLAY IS HEOUESIH) WHEN ANOIHER PRIORITY DISPLAY IS 
R038T already ACTIVE (A PRIORITY WITH LINUS BIT14 IS AN E){CBPTICN) 

R0388 erasable INITIALIZATION REOUIRED— 

B0389 AOCOHPLIaiED BY FRESH START- 1 . PLAGWRD4 <U®D EXCLUSIVELY BY DISPLAY INTERFACE ROUTINES) 

B0391 2. NVSAVE = NORMAL VERB AND NCLW HEOISTER. 

*0393 3. EBANKTBN = NORMAL INACTIVE FLAOwOROfALSO CONTAINS NORMALS EBANK) . 

*0395 5 . RiSAvE = MA»(BRAN CONTROL WORD 

*0396 4 . HBSTHEO = PRIORITY 30 AND SUPERBANK 3 . 

B0398 OUTPUT— 

H0399 NVWOIO = PRIO VERB AND NOUN 

B0400 NVWOHD ♦i(MABKNV) = MARK VERB AND NOUN 

R0401 NVWOBD ♦zTNVSAVE) r NORMAL VERB AND NOUN 

B0402 DSPPLOTEBANKSAv) = PRIO FLAGwORD ( INCLUDING EBANK) 

R0403 DSPPLO ♦ 1 (MAH<ESAN) = MARC FLAGwORD ( INCLlDING EBANK) 

R0404 DSPFLO ♦2(EBANKTEM) = NORMAL FIAGwOHD ( INCLLDIG EBANk) 

B0405 CADRPLai = PRIO USERS CALL CADR LOCATION 

R0406 CADRPLai ♦l(MARKPLai) = MARC USERS CALL CADR LOCATIOI 

*0407 CADRFLSH ♦ 2 (TEIPFl.ai) = NORMAL USERS CALL CADR «.i LOCATION 

R0408 PRIOTIW = TISE EAQI PRIO (ffiOJEST FIRST SENT OUT 

R0409 OPTIONl = DESIRED OPTION FROM GOPERP 4 

R0410 PIA0»HD4 = bit INFO FOR CONTROL OP ALL DISPLAY ROUTINES 

R0411 DSPTEMi : Rl INFO FOR ASTRONAUT FROM PERFOBM DISPLAYS(NORMAL) 

R0412 SLBRCUTINES USED— NVSUB, FLAGUP, PLAGDOWN, ENDOPJOB, HJANKaW, ABORT, JOBwAKE, JOBStEBP, PINDvAC, PRIOCHNG, 
R0414 JAMIBRI, NVSUBuSY, PLAaiCN, ENDIDLE, CHANOi, BANKJUMP, MAkECADH, NOVAC, 

B0415 DEBRIS— (STORED INTO) 

*0416 temporary temporaries- a, O, L, MPAC + 2 , MPAC + 3 , MPAC + 4 , MPAC * 5 , MPAC +6, RJPTRBG 2 , HJPTHEG 3 , CYL, 

R0418 EBANK, RUPTREG 4 , LOO, BANKSET, MODE, MPAC, MPAC 4 , FACEREG 

H0420 BRASAHes( aiARED AND USED WITH OTHER PROGRAMS) CADRSTOR, DSPLIST, LOC, DSPTEMi, OPTIONl 

R0422 ERASABLESCUSED ONLY BY DISPLAY ROUTINES)- NVWOBD, »i ,+ 2 , DSPFLG, + 1 , + 2 , CADHFLSH, + 1 , t-z, PRIOTIMB, PLAOwbDa. 
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I. DISPIAY INTERPAOE Bournes U8BR-S PAOB NO. 12 EO S4 

■S424 RlSAVE, MARKZPAC, _ 

DGSRIS (USSl Bur not SIORHO INTO)- NOUNRBO, VERBHBO, UICCTB, MCWSAVBl 

■0429 PLAOWOBD DBSCHIPTIONS— 

n4ZT PIA0WHD4- 388 DBSQttlPTICM tM)BR UB SBCTICN ERASABLE ASSIOWOTTS 

■0428 D3PPLG, DSPPUJ*!, DSPPIO *2- 

■0429 

■0430 bits 1 blank R1 
■0431 2 BIAOC R2 

■0432 3 BWNK R3 

4 PLAaiINO DISPLAY ffiOUBSTH) 

Mt434 5 PBRPOfM DISPLAY BBoeSIHD 

,^35 B BaWPHCT OCDSPRBT 

■0436 T PRIO DISPLAY 

— DBC MARC PBRPCW 

■0439 10 EBANK 

■0440 11 EBANK 

■0441 12 V99PA3TB 

MI442 13 - 2ND PART OP PBHPOBM 

n 443 15 R^FLASH OR RHX) REFLAai OR REDO 

n444 15 J leoesr 

n44S restarting displays— 

■0440 RULES FOR THE DSKY OPERATOR— 

■•i-T t PROCEED A!® TEJMWTE S8RYE AS RESPCNSES TO REQUESTS FOR OPERATOR RESPONSE (FLASHmG V/N) . AS ^G 

5^, AS THERE IS A.NY FEQUBST AWAITING OPERATOR RESPCNSE, ANY USE CP PROCraO OR TERMINATE WILL 

12^? RESPCNSES TO H«T REO^ST. CARE SIOULD BE EXERCISED IN ATTEMPTING TO KILL AN WERATOR INITIATED MOIITOR 

a-—, WITH PROCEED AJO TEIMINATE FOR THIS REASCN. 

2 THE ACTRONAur HIST RSSPCND TO A PRIORITY DISPLAY NO SOCNER THAN 5 SECS PRCM THE TIME THE MISSIW 
PROraS^OT our THE REOBST for operator RESPCNSE (THE ASTRQMUT WOJLD SEE THIS 

cue TO TI* IT TAKES TO GST DISPLAY SENT CUT.) IP THE ASTRCNAUT iffiSPCNDS TOO SOCH, THE PRIORITY DISP^ 
sSr w 1 ^S?!aS ^in ^til an acotwated 5 secs prcm time the PissT/ai^w 

OUT. THE SA.** 5 SEC. DSAY WILL OCCUR AT 163.84 SECS OR IN ANY 14X.TIPLB OP THAT TK® OJE TO PROGRA.M 
IIB4B4 CCNSIDERATICN. 

^ light is ch, it simply relea®s the keyboard and display for internal Uffi. 

SI!! B) IF ^ ^ RBLEA® LIGHT IS OFF, AND IF SCNE BEQUEST FOR OPERATOR RESPCN® (FLAailNG V/N) IS STILL 

S!! ! AWAITING BESPCH® THEN IT RE-ESTABLISHES THE DISPLAYS THAT ORIGINALLY HEOJESTED RESPW®. 

12^” IF W O^TOR WA-NIS therefore TO RB-EST»BLIal BUT CCNDITICN (A) IS ENCCHNTERED, A SECCND DBPRESSICH OP 

M 4 T 4 key RELEA® BunCN .MAY BE NECESSARY. 

4 IT IS LMPORTA.'rr TO answer all REQUESTS FOR OPERATOR ®SPGN®. 

BB4TS 5 • IT IS always GOOD PRACTICB TO TERMINATE AN EXTENDED VERB BEFORE AacING FOR ANOTHER CNE OR THE SA® CHE 

)04Tg ’ OYER AGAIN. 

M4T9 SPECIAL CCNSIDERATICHS— 


Ill 
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>0480 

>0481 

>0483 

>0484 

>0486 

>0488 

>0489 

>0491 

>04911 


1 . WAC +2 SAVED ONLY IN MARK DISPLAYS 

2. OTSPm),REG0DSP(R),O(WAHK(R) ALWAYS TURN CN THE PLAai IP BITERED WITH A PAsm VERB llffiiE«T 

3. all NOIMAL DISPIAYS are RBSWKMBLE except OOISPIR) REOCDOTci) BBOEST. 

4 . ^BXTEN^ verbs with DISPLAYS SIQULD START WITH A TC TESTXACT AND PINIai WITH A TC ENDPvT 

.f be IN THE SA>« ERANK and SUPERBANK AS THE lAST N(»»AL DISPLAY RESTARTED 

T. IP CLEANDSP IS RESTARTED VIA A .1 PHASE OMNCB, CAP ZERO 9I01XD BE ExECUffiD BEPOBE THE TC BANkCALL. 




Ill 


AssaetB 


P0492 

40493 

A0494 

A0495 

R049S 

110498 

0499 

0500 

0501 


0502 I®' 
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CAP 

IC 


BITX 

blankbt 


20*35 OCT. 28,1968 SATRAP .OOT PAGE 1433 
UffilUS PACE NO. 14 Bo S4 

X=l,2,3 blank R1,R2,R3 RESPECTIVELY 
HEMW TO UffiR HERE 


IN OBOra TO USB blanket CORRECTLY THE USER MUST USE A DISPLAY ROUTINE-THAT ENDS IN R FIRST POLIXWED BY THE CALL 
TO blanket at the IfOeDIATE RETURN LOC. 


5415 

4000 

5415 


BUY^ 02 
WILOC PPTAQ4 

bank 


COKT 02/DSPLA 


0503 

0504 

0505 
0508 
050T 

0508 

0511 

0512 


REP T02 LAST 141T 
REP [1 

REP T03 last 1433 
REP T04 LAST 1433 
REP 2 LAST 1433 

REP 33jl last 1419 

REP 63 LAST 1410 


5415 54 162 0 BLANKET TS 


5416 4 0160 1 

5417 7 0162 0 

5420 50 161 1 

5421 26 160 1 

5422 0 0002 0 


MPAC +6 
PLAYTB44 
MPAC +6 
INDEX MPAC +5 
ADS P1AYTH44 


CS 

wlac 


TC 


5423 0 4574 0 ENEMABC TC 


5424 20457 0 


CADR 


05121 REP 289 LAST 1418 

05122 REP ^ LAST 888 

05123 

05124 REP 81 LAST 1406 


5425 3 4714 1 CLEAHMRC CAP 

5426 55«044 1 


TS 


POSTJlWP 

MARcEND 

zero 

ExTvaACr 


05125 REP 

05126 REP 


LAST 385 
LAST 1433 


5427 0 0004 0 

5430 4 4712 0 

5431 7 0100 1 

5432 54 100 1 


INHINT 
CS BITl 

MAaC FLAOHIDA 
TS FVA0«»4 


5433 0 0003 1 RELINT 

5434 0 0002 0 TC O 

444AUJ extended verb ROUTINES THAT HAVE AT LEAST QJE FLASHING DISPIAY MUST TCP BIDMAHK OR TCP ENDBXT WHEN 
PINISI^. 


05127 

05128 REP 332 LAST 1433 
R0513 
ROS15 


0516 

0517 

0518 


REP 


0519 REP 


10,2457 

10,2000 

10,2457 


bank 10 

®TLOC DISPLAYS 

bank 

CCUNT 10/DSPIA 


R05Z0 

B052Z 


NTERONLY IS USED TO DIFFERENTIATE THE MARK ROUTINE WITH CNI,y CNE RETURN TO THE USER FROM THE MARKING ROmNE WIT 
3 RBluroiS TO THE USER. THIS ROUTINE IS ONLY USED BY GQ4A«C1 AND CXMAHKlR. 


05291 REP 
05297 REF 


LAST 744 


10,2457 

10,2460 


0 5425 1 MABKEND TC 
1' 3547 0 TCP 


CLEARMRC 

MARCOVEH 
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U88R.S PAOB NO. 15 


Bo S4 


0530 

BEE 

1 


10,2461 

54 155 1 

OCMAWC TS 

PLAYTHHl 

ENTBANCB POB HAHC OODSP 

0531 

BBP 

54 

LAST 1417 

10,2462 

3 4674 0 

OCMARS CAP 

BTT15 

BIT15 set POR all MARK REQUESTS 

0532 

REP 

1 


10,2463 

1 2626 0 

TCP 

Q0PLAW2 


0533 

RBP 270 

last 1433 

10,2464 

3 4714 1 

klebiex cap 

ffiRO 

CLEAN CUT EXTENDED VERBS 

0534 

REP 

2 

LAST 1434 

10,2465 

54 155 1 

OCMARCP TS 

PLAYTH41 

entrance POR MARK OOFIASH 

0535 

REP 

1 


10,2466 

3 3157 1 

CAP 

mahkpmsk 

MA«c,PLAai 

0536 

REP 

2 

LAST 1434- 

10,2467 

1 2626 0 

TCP 

OOFLASH2 

0539 

REP 

3 

last 1434 

10,2470 

54 155 1 

OCMARC2 TS 

PLAYTTMi 

marc OOPBRPS-3 AST. RETURNS 

0540 

REP 

1 


10,2471 

3 3646 0 

harcpohm cap 

MPERFMSK 

marc, perform, PLASI 

0541 

REP 

3 

LAST 1434 

10,2472 

1 2626 0 

TCP 

aoFiAaL2 


0542 

REP 

4 

LAST 1434 

10,2473 

54 155 1 

OMAreCT TS 

PIAYTB41 

USED POB 3CCMP DECIMAL PERFORM 

0543 

REP 

1 


10,2474 

3 3633 1 

CAP 

MABC3MSK 


0544 

REP 

4 

LAST i434 

10,2475 

1 2626 0 

TCP 

oaPLAai2 


0545 

REP 

5 

LAST 1434 

10,2476 

54 155 1 

GCMARC4 TS 

PLAYTtMl 


0546 

REP- 

1 


10,2477 

3 3634 0 

CAP 

MARGaMSC 

marc , PERFORM , FLA ai , Blank 

0547 

REP 

5 

last 1434 

10,2500 

1 2626 0 

TCP 

OCPLASH2 

0548 

REP 

6 

LAST 1434 

10,2501 

54 155 1 

OCMAROl TS 

PLAYTTMi 

ENTB+NCE FOR MARK GKDSPB 

0549. 

REP 

55 

last 1434 

10,2502 

3 4674 0 

CAP 

flITlS 


0550 

REP 

1 


10,2503 

1 2604 0 

TCP 

GQDSPH2 


0551 

REP 

7 

last 1434 

10,2504 

54 155 1 

GCMARcPR TS 

PLAYTS41 

BITRANCE POR MARC GQFlAaiR 

0552 

REP 

2 

last 1434 

10,2505 

3 3157 1 

CAP 

HARGFMac 


0553 

REP 

1 


10,2506 

1 2765 0 

TCP 

GCDSPR3 


0559 

REP 

8 

lAST 1434 

10,2507 

54 155 1 

GCMARC2a TS 

PLAYTTMl 

marc GOPERPS-3 AST. RBTS-f IMMEDIATE 

0560 

REP 

2 

LAST 1434 

10,2510 

3 3646 0 

CAP 

MPERFMS: 

mark, perfopm, plash 

0561 

REP 

2 

LAST 1434 

10,2511 

1 2765 0 

TCP 

GODSPRS 


05611 

REP 

9 

LAST 1434 

10,2512 

54 155 1 

GCKAHK3R TS 

PLAYTSMi 


05612 

REP 

2 

last 1434 

10,2513 

3 3633 1 

CAP 

>«R<3MSK 


05613- 

REP 

3 

last 1434 

10,2514 

1 2765 0 

TCP 

GCDSPRS 


0562 

REP 163 

LAST 1408 

10,2515 

3 4712 1 

h»kE4arc cap 

CNE 


0563 

REP 

1 


10,2516 

0 3063 1 

TC 

COPIES 


0564 

REP 

T 

LAST 1433 

10,2517 

3 0100 0 

CA 

PIACWRD4 

IS NOKI OR PRIO BUSY OB WAITING 

0565 

REP 

1 


10,2520 

7 3847 0 

MAaC 

OCT34300 


0566 

REP 392 

LAST 1419 

10,2521 

10 000 0 

CCS 

A 


0587 

REP 

1 


10,2522 

1 2560 1 

TCP 

CHKPRIO 


0568 

REP 

8 

last 1434 

10,2523 

3 0100 0 

CA 

PIAG«®4 

IS marc SIEEPING DUE TO ASTRO BUSY 
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05T0 

•5T1 

•572 


ilSSaCHli BBVISION 249 CP AOC PRCXSlAM COLOSSUS Bt NASA 2021111-041 

DUPtAir niEaPACB boutines 

«P 3^ lASr 1411 10,2524 7 4702 1 MASK BIT9 

10,2525 0 0006 1 BX®® 

ter 1 10,2526 1 2530 1 B/P MARCPLAY 

ter 110 LAST 1284 10,2527 1 5112 1 TOP ETOOPJCB 


USERaS PAOB NO. 18 Bo S4 


NO 


0594 

0595 
0500 
•5905 
•597 
•598 

0599 

0000 

0601 

0002 

0003 

0004 

0005 
0000 

0007 

0008 

0609 

0010 

0011 



0015 

0010 

B0617 
BOO 19 
R0621 
B0623 

BOO 24 
B0026 


0028 

0629 

0030 

0031 



ter 

29 

lAST 1383 

10.2530 

10.2531 

0 0004 
4 4715 

0 

1 

MARCPLAY IMIINT 
CS 

FIVE 

ter 

-{9 

LAST 1434 

10,25 32 

7 0100 

1 

MASK 

FLAawiS>4 

tee 

164 

LAST 1434 

10,2533 

6 4712 

i 

AD 

CNB 

■BP 

10 

lASr 1435 

10,2534 

54 100 

1 

TS 

PIAOWFDa 


1 


10.2535 

10.2536 

0 0003 

4 1070 

1 

0 

Ha.lNT 

OOGCHARC CS 

MARCPLAO 

ter 

4S 

LAST 1415 

10,2537 

7 4706 

0 

MASK 

bits 

tee 

393 

LAST 1434 

10,2540 

10 000 

0 

CCS 

A 

ter 

1 


10,2541 

1 2544 

1 

TCP 

MARCCOP 


1 


10,2542 

4 0370 

1 

CS 

MAHKNV 

tee 

2 

LAST 1435 

10,2543 

54 370 

1 

7S 

MARCNV 

tee 

1^ 

LAST 1435 

10,2544 

3 4712 

1 

marcoip cap 

CNE 

tee 

1 


10,2545 

1 2744 

0 

TCP 

PRIOPIAY 

tee 

1 


10,2546 

3 0165 

0 

COPYTOGO CA 

MPAC2SAV 


tos 

LAST 1433 

10,2547 

54 158 

1 

TS 

MPAC +2 

tee 

1 


10,2550 

so 164 

1 

COPYPACS INDEX 

COP INDEX 


1 


10,2551 

3 3657 

0 

CAP 

PRIOOCT 

tee 

1 


10,2552 

54 162 

0 

TS 

GBWASK 

tee 

2 

LAST 1435 

10,2553 

50 164 

1 

INDEX 

COP INDEX 

tee 

1 


10,2554 

3 1067 

1 

CAP 

ERANKSAV 

me 

1 


10,2555 

54 180 

1 

TS 

TEMP0R2 

me 

63 

LAST 1410 

10,2556 

54 003 

0 

TS 

EBANK 

me 

333 

LAST 1433 

10,2557 

0 0002 

0 

TC 

Q 


reset mm web norm, set mirk 


PERFOiW 


MARC INDEX 


ACTIVE E8ANK AND FLAG 


POCMK CHECKS TO SEE IP THE CURRENT MARK REOUEST IS MADE BY THE ASTRCHAUT WHIIE INTERRUPTING A GOPLAY DISPIAY 
CA OR A PRIG) IF THE ASTRONAUT TRIES TO MARC DURING A PRIO, THE CHECK FAIL LICMT GOES ON AND THE MARC 

IS B«eD IP HE TRIES TO MARC DURING A NORM, THE MARC IS ALLOWED. IN THIS CASE THE NORM IS PUT TO Sli!EP 


WTIL ALL MARCINO IS FINISHED. 

IP 1* MARC REQUEST CCMES FRCM THE PROGBA.M DAAHNG A TIME THE ASTRCNAUT IS NOT INTEHRJPTING A NORMAL OB A 
PBIO. ItW: marc request is put to sleep until the ^.resent active display IS RBSPCNDED TO by THE ASTRCNAUT. 

3 0100 0 CrtCPRIO CA FLAGWRD4 MARC ATTEMPT DURING PRIO 

7 3402 0 mask OCT24100 

10 000 0 ocs A 

1 38 02 1 TOE MARSLEEP 


RBF 11 LAST 1435 10,2560 

■HP 1 10,2561 

tee 394 LAST 1435 10,2562 

BP |l 10,256 3 


Assa«t« BBVISICW 249 OP AOC FBCORM COLOSSUS BY fMSA 2021111-041 
DISPIAY IWIBRPACE ROUTINES 


20’35 OC>r. 28,1988 SATRAP .OOT PAOB 1436 


III 


0632 

REP 

12 

last 1435 

10,2584 

4 0100 

1 


CS 

PLAani >4 

0633 

REP 

35 

last 1418 

10,2565 

T 4710 

1 


FWSK 

BIT3 

0634 




10,2566 

0 0004 

0 


IMIINT 

0635 

REP 

13 

last 1436 

10,2567 

28 100 

1 


ADS 

PIAOWRD 4 

0636 

HEP 

1 


10.2570 

1 2662 

0 


TCP 

S 1 NCRM 

06 3T 

REP 

3 

last 1435 

10,2571 

3 0370 

0 

MAH<PBHP CA 

MARKNV 

0638 

REP 

1 


10.2572 

7 4160 

0 


mask 

VBRBMASK 

0639 

REP 

1 


10.2573 

1 3246 

0 


TCP 

MVSODSP 

0640 

REP 

10 

last 1434 

10,2574 

54 155 

1 

OCDSP 

TS 

PLAYTHMi 

0641 

HEP 

271 

last 1434 

10,2575 

3 4714 

1 

O0DSP2 

CAP 

zero 

0642 

HEP 

0 

last 1434 

10,2576 

1 2626 

0 


TCP 

aOFLA 9 l 2 

0643 

HEP 

11 

last 1438 

10,2577 

54 155 

1 

GGDSPHET TS 

PlAYTEMl 

0644 

HEP 

55 

last 1408 

10,2600 

3 4705 

1 


CAP 

BIT 8 

0645 

BE’ 

7 

last 1436 

10,2601 

1 2626 

0 


TCP 

GOPLASI2 

0646 

REP 

12 

LAST 1436 

10,2602 

54 155 

1 

GCDSPR 

TS 

PLAYTBMi 

064T 

HEP 

272 

last 1436 

10,2603 

3 4714 

1 

GCDSPRl 

CAP 

zero 

0648 

HEP 

3 

LAST 1433 

10,2804 

54 160 

1 

GCDSPR 2 

TS 

PLAYTEM 4 

0649 

BEP 273 

last 1436 

10,2605 

3 4714 

1 


CAP 

zero 

0650 

REP 

1 


10,2606 

1 2767 

1 


TCP 

OODSPHSl 


USERaS PAOB NO. IT 
SET m»c Over norm 


Bo S4 


btirancb for a godsp with a paste 
SET bits to go BAQc TO USER AFTER NVSUB 


B0851 

B0653 

H0654 

R06S6 

1(0657 


♦ IXWT MOVE 

SET ^ active or a NORMAL DISPWY THAT IS 

OLD ^ not NEED TO USE THIS ROn-INE SINOB A NEW NORMAL DISPLAY AUTOMATICALLY CLEARS OUT AN 

CALLING SEOUENCE FOR CLEANDSP- 



AO 6 S 8 







TC 

BAWCALL 

A0659 







CADR 

CLEANDSP 

0660 

REP 

274 

LAST 1438 

10.2607 

3 4714 

1 

CLEANDSP CAP 

zero 

0661 

REP 

13 

last 1436 

10,2610 

54 155 

1 

REFLASI TS 

PLAYIEMl 

0662 

REP 

1 


10,2611 

3 36 3 2 

0 

CAP 

BEDCMASK 

0663 

REP 

e 

LAST 1438 

10,2612 

1 2626 

0 

TCP 

GCFI.ASH 2 

0664 

REP 

14 

LAST 1438 

10,2613 

54 155 

1 

REFLASHR TS 

PLAYIEMl 

0665 

REP 

2 

last 1438 

10,2814 

3 3632 

0 

CAP 

BEDCMASK 

0666 

REP 

4 

LAST 1434 

10,2615 

1 2765 

0 

TCP 

GODSPBS 


FLASH AND PERMIT 


FIASH AND PERMIT 



A33B«ILB revision 249 OP AGO PROGRAM COLOSSUS BY NASA 2021111-041 
DISPLAY UOBHPACE ROUTINES 


0S6T 

REP 

15 

LAST 

1436 

MSS 

REP 

61 

LAST 1404 

M69 

REP 

9 

lAST 

1438 

MTO 

REP 

IS 

LAST 

143T 

MTl 

REP 

82 

lAST 

143T 

MT2 

REP 

3 

LAST 

1434 

MTS 

REP 

IT 

lAST 

143T 

MT4 

REP 

52 

LAST 

1418 

MTS 

REP 

4 

LAST 

1438 

MTS 

REP 

1 



MTT 





MTS 

REP 

1 



MT9 

REP 

18 

LAST 

1437 

M80 

REP 

1 



M81 

REP 

5 

LAST 

1436 

M82 

REP 

19 

LAST 

143T 

MSS 

REP 

2 

LAST 

143T 

MS4 

REP 

10 

LAST 

14 3T 

MBS 

REP 

2T5 

LAST 

1436 

MSS 

REP 

3 

lAST 

1435 

M8T 

REP 

1 



MSS 

REP 

1 



M89 

REP 

14 

LAST 

1436 

M90 

REP 

1 



M91 

REP 

395 

LAST 

1435 

M9Z 

REP 

1 



MS3 

REP 

15 

LAST 

143T 

M94 

■REP 

1 



M9S 





M96 

REP 

1 



M9T 

REP 

2T6 

LAST 

143T 

M98 

REP 

1 



M99 

REP 

16 

LAST 

143T 


54 155 1 

REGCDSP 

TS 

PIAYTB41 

3 46TS 1 


CAP 

BIT14 

1 2626 0 


TCP 

GOPlAalS 

54 155 1 

REGODSPR TS 

PLAYTEMl 

3 48T5 1 


CAP 

BIT14 

1 2604 0 


TCP 

GCDSPR2 

54 155 1 

GCFlAai 

TS 

PlAYTHSi 

3 4T0T 0 


CAP 

BIT4 

54 160 1 

OOPLA9I2 TS 

P1AYTPM4 

0 3050 1 


1C 

sAvraxcs 

0 0003 1 


RELINT 


1 26T4 1 


TCP 

makepiay 

54 155 1 

PRIODSPR TS 

PLAYT0I1 

3 3851 0 


CAP 

bits? +4 

1 2T65 0 


TCP 

GCDSPRS 

54 155 1 

PRICDSP 

TS 

PLAYTB41 

3 3651 0 

sbtprio 

CAP 

bits? +4 

1 2626 0 


TCP 

GOFIASI2 

3 4T14 1 

makbprio cap 

ZERO 

54 164 0 


TS 

COP INDEX 

0 3522 1 


TC 

LINUSOIR 

1 2650 1 


TCP 

HIPRIO 

3 0100 0 


CA 

PLAGW»4 

T 36T0 1 


MASK 

OCTZOlOO 

10 000 0 


CCS 

A 

1 2T23 1 


TCP 

PRICBOBT 

3 0100 0 

HIPRIO 

CA 

PLAGWBD4 

T 5612 0 


MASK 

OCT40400 

0 0006 1 


EXTEND 

1 2656 1 


BZF 

ASKiWfW 

3 4T14 1 

SETIMARC 

CAP 

ZgRO 

1 3122 1 


TCP 

JOBxCHS 

3 0100 0 

askifnrm ca 

PIAOIWBD4 


20*35 OCT. 28,1968 SATRAP .DOT PAGE 143T 
USSUS PAGE NO. 18 ^ S4 


leave (ULY PLASH BIT SET 


BRANQI direct with NO ffiPARATE JOB CALL 


LINUS REIURN 

IS PHIO IN ESroiDLE OR BUSY 
YES, ABORT 

mark active 


NORMAL ACTIVE 


*SSe«LB l»riSI(M 248 OP AGO PRCORAM COXBSUS By NASA 2021111-041 

DispLAy mefVACB houtinhs 


OTOO REP 1 

OTOl 

0T02 BSP 1 


0T05 BEP I 
0T08 BEP 1 


OTOS REP 1 

0T09 BEP 22 lAST 1384 

OTIO REP t 

OTll BEP 2TT last 1437 

0712 BEP 2 lAST 1435 

0713 BEP 28 LAST 1410 

07131 BW 3 LAST 1410 

07132 BEP 1 

07133 BEP 1 

07134 REP 10 LAST 815 

07135 BEP 5 LAST 1437 

0714 BEP 1 

0715 REP 398 LAST 1437 

0710 BEP 1 

0717 BEP 1 

0718 REP 1 

0719 BEP 75 LAST 1408 

0720 BEP 4 last 1437 


REP 1 
REP 3 
REP 53 
BEP 397 
BEP 2 


LAST 1437 


last 196 

LAST 1437 
LAST 1438 
LAST 1438 


BEP 17 LAST 1437 
BEP 1 

BEP 3 LAST 1438 


10,2657 

7 3666 0 

mask 

OCT10200 

10,2660 

0 0006 1 

EXTETO 

10,2661 

1 2664 0 

BZP 

CKTOCOpy 

10,2662 

3 4712 1 

SBTNOIM CAP 

(ME 

10,2663 

1 3122 1 

TCP 

JOBxCHS 

10,2664 

0 3062 0 

OKTOCOpy TC 

COpyNMW 

10,2665 

0 3333 1 

IC 

WITCHCNE 

10,2666 

0 5074 1 

TC 

JCBwAkB 

10,2667 

0 3350 1 

tc 

xClfTCEND 

10,2670 

3 0025 0 

REDOPRIO CA 

TISEi 

10,2671 

55«147 0 

TS 

PHIOTIi* 

10,267 2 

3 4714 1 

KEEPPRIO cap 

ZERO 

10,2673 

1 2744 0 

TCP 

PRIOPLAY 

10,2674 

3 0167 1 

MlKEPLAy CA 

PRIORITY 

10,2675 

7 7674 1 

MASK 

PHIO37 

10,2676 

54 163 1 

TS 

USERPRIO 

10,2677 

3 7670 1 

CAP 

PHIO33 

10,2700 

0 5103 0 

TC 

PRIOCHNO 

10,2701 

3 0160 0 

CA 

PLAyTEM4 

10,2702 

7 365 0 0 

MAac 

BITS15+7 

10,2703 

10 000 0 

CCS 

A 

10,2704 

1 2640 0 

TCP 

makeprio 

10,2705 

1 2707 1 

TCP 

IPLBGAL 

10,2706 

1 2515 0 

TCP 

MAkBMARK 

10,2707 

3 4711 1 

IPLEGWL CAP 

TWO 

10,2710 

54 164 0 

TS 

COP INDEX 

10,2711 

0 3522 1 

1C 

LINUSCMr 

10,2712 

1 2725 1 

TCP 

QcropLAy 

10,2713 

4 1071 1 

Cs 

BBANKTEM 

10,2714 

7 4707 1 

Miac 

BIT4 

10,2715 

10 000 0 

CCS 

A 

10,2716 

1 2725 1 

TCP 

(KTOPLAY 

10,2717 

3 0100 0 

CA 

PLAGWHD4 

10,2720 

7 3641 0 

MAa< 

NBUSMASK 

10,2721 

0 0006 1 

extend 


10,2722 

1 2725 1 

BzP 

CKTOPIAY 


20 ’35 OOT. 28,1968 SATRAP .007 PAOB 1438 
UffiR^S PAGE NO. 19 Eo S4 

bits 13+8 

NO 


SAVE TIW PBI0D3P SSNT OUT 
START UP PHIO DISPlAy 

SAVE users priority 

RAISE PRIORITY FOR PAST JOBS APTER WAKE 

IS IT MARK OR PHIO OR NOR4 

ITS PRIO 
ITS MWRC 

LINUS RETUW 


WAS NORM ASIEEP 
are any NORMS ASl-EEP 





ASS£»eLB BEVISIOI 249 OP AOC PBOffliAM COUJSSUS ffif NASA 2021111-041 
OISPIAY INXEBPAOB RCWTINBa 


20 ’35 OCT. 28,1998 SATHAP .OOT PAOB 1439 
USBiUS PAOB NO. 20 Eo S4 


•T31 

BBP 

e 

LAST 1410 

10,2723 

0 5622 

1 

tT3Z 




10,2724 

01502 

1 

BT33 

HEP 

1 


10,27» 

0 3064 

0 

•T331 

HEP 

2 

LAST 1438 

10,2726 

3 0163 

0 

•T332 




10.2727 

0 0006 

1 

•T333 

HEP 

24 

LAST 13T8 

10,2730 

04 007 

1 

•T334 

REP 

3 

LAST 193 

10,2731 

54 366 

0 

tT3T 

hep 

18 

LAST 1438 

10,2732 

3 0100 

0 

•T38 

hep 

1 


10,2733 

7 3642 

0 

tT39 

HEP 398 

LAST 1438 

10,2734 

10 000 

0 

•T40 

HEP 

1 


10,2735 

1 3102 

0 

•T41 




10,2738 

1 2740 

1 

aT42 

HEP 

2 

lAST 1439 

10,2737 

1 3102 

0 

UT43 

COULD PUT NOBM BUSY 0®qc HEBE TO SAVE 

•T44 

HH' 

2 

LAST 1438 

10,2740 

0 3333 

1 

«T45 

REP 

9 

LAST 1438 

10.2741 

0 5074 

1 

9T48 

HEP 

2 

LAST 1438 

10.2742 

0 3350 

1 

•T4T 

HEP 

T8 

LAST 1438 

10,2743 

3 4711 

1 

aT48 

HEP 

S 

LAST 1438 

.10,2744 

54 164 

0 

0149 

HEP 

1 


10,2745 

1 3216 

0 

OTSO 

Hep 

20 

LAST 1437 

10,2746 

54 155 

1 

OTSl 

hep 

2 

LAST 154 

10,2747 

3 7703 

1 

•TS2 

HEP 

11 

LAST 1437 

10,2750 

1 2626 

0 

0T53 

HEP 

2 

LAST 715 

10,2751 

55«04S 

0 

0T54 

HEP 

1 


10,2752 

3 3624 

1 

0T5S 

HEP 

21 

LAST 1439 

10,2753 

54 155 

1 

OTSO 

HEP 

1 


10,2754 

3 3623 

0 

0T5T 

REP 

12 

LAST 1439 

10,2755 

1 2626 

0 

0T58 

REP 

22 

LAST 1439 

10,2756 

54 155 

1 

0T59 

HEP 

1 


10,2757 

3 3927 

1 

OTSO 

HEP 

13 

LAST 1439 

10,2760 

1 2626 

0 

0754 

REP 

1 


10,2761 

0 3043 

0 

0TS5 

IffiP 

14 

LAST 1439 

10,2762 

1 2626 

0 


PRICBORT IC 

POCDOO 


OCT 

1502 


CKTOPLAY TC 

COPIES2 


CA 

USERPRIO 


EXTB® 

ROR 

SUPBHBNK 


TS 

HBSTREO 


CA 

FLA0WRD4 

PRIO OR MAUL GOING 

MASK 

IWAac 


CCS 

A 


TCP 

OOSLEEPS 

YES 

TCP 

*2 


TCP 

CXBLEEPS 

MARC GOING 

time 

TC 

WITCHCNE 

IS IT NVSUB BUSY, ENDIDLE OR NOCNE 

TC 

JOftlAKE 


TC 

XCHTQEjro 


PLAYJUMl CAP 

TWO 


PRIOPLAY TS 

COP INDEX 


TCP 

GOPIAY 


EXDSPRET TS 

PLAYTE41 


CAP 

BITlS+6 


TCP 

Q0FLASH2 


OOPBRPl TS 

NOBSIB^l 

STORE DESIRED CHECkI.IST VALUE 

CAP 

V01N25 

USED TO DISPIAY CHBCS<LIST VAIUB IN R1 

GOPERFS TS 

PLAYTSMl 


CAP 

PERFWac 

LEAVE CNLY PtAai, PERPOR4, BIANKING 

TCP 

00FLASI2 


GOPBBP2 TS 

PtAYIE4l 

DESIRED VERB-NGIN TO DISPLAY Rl.R2,R3 

CAP 

PERFzMSK 


TCP 

GOPLAai2 


GOPEHP4 TC 

PUHHS4 


TCP 

GOFIASI2 



I 




Ill 


A3SBBL8 BD^ISION 249 OF AOC PROCaWM COLOSSUS BY KASA 2021111-041 
DISHAY WIEBFACB ROUTINES 


ores 

BEF 

23 

LAST 1439 

10,2T63 

54 155 1 

OOPLAsm TS 

PLAYTB41 

0T6T 

BBF 

54 

LAST 1438 

10,2764 

3 4707 0 

CAP 

BIT4 

OTSS 

BBF 

0 

LAST 1438 

10,2765 

54 160 1 

OCDSPRS TS 

PLAYTEM4 

0T69 

OS' 

48 

LAST 1403 

10,2766 

3 6214 0 

CAF 

THREE 

•TTO 




10,2767 

0 0004 0 

OQDSPHSl INHINT 

OTTl 

BBF 

. 0 

LAST 140T 

10,2770 

54 072 0 

TS 

IM»raBQ3 

07T2 

BHF 

29 

LAST 1438 

10,2771 

3 0167 1 

CA 

PRIORITY 

0TT3 

BEF 

4 

LAST 1438 

10,2772 

7 7674 1 

MAaC 

PRIO 37 

0774 

RHP 

11 

last 118T 

10,2773 

54 063 0 

TS 

NEwPRIO 

omi 

BH' 

T 

last 1440 

10,2774 

3 0160 0 

CA 

PIAYTH44 

0TT42 

BBF 

55 

LAST 1440 

10,2775 

7 4707 1 

M»ac 

BIT4 

0TT43 

BHP 

399 

last 1439 

10,2776 

10 000 0 

CCS 

A 

OTT44 

REF 

1 


10,2777 

1 3005 0 

TCP 

VACDSP 

0T745 

IHP 

12 

LAST 1440 

10,3000 

3 0063 1 

CA 

NEWPRIO 

0TT48 

BHP 

34 

LAST 141T 

10,3001 

0 5 0 27 1 

TC 

NCVAC 

0TT4T 

BEF 

T 

LAST 664 

E7,1777 


EBAl«= 

WHOCARES 

07T48 

BBF 

2 

LAST 1437 

10,3002 

02674 0 

2 CADR 

makeplay 

0TT48 




10,3003 

20107 0 



0TT49 

BHF 

1 


10,3004 

1 3013 1 

TCP 

both JOBS 

0T75 

BBF 

35 

LAST 1410 

10,3005 

3 0006 1 

VAC5DSP CA 

bbank 

OTTS 




10,3006 

0 0006 1 

ExTOTO 


0777 

BBF 

25 

last 1439 

10,3007 

04 007 1 

ROR 

supERffiac 

OTTS 

BBF 

228 

LAST 1415 

10,3010 

54 001 1 

TS 

L 

OTTO 

BBF 

1 


10,3011 

3 3865 1 

CAP 

MAkEGBI 

OTSO 

BS' 

3 

LAST 411 

10,3012 

0 5053 1 

TC 

SPVAC 

0T81 

BBF 

2 

last 143T 

10,3013 

0 3050 1 

BCHHJOBS IC 

SAVELOCS 

0T82 




10,3014 

0 0008 1 

EXT©® 


0T83 

BH' TOO 

last 1435 

10,3015 

3 0156 0 

DCA 

MPAC 

0T84 

BBF 

25 

LAST 141T 

10,3016 

SO 064 0 

INDEX 

LOCCTR 

OTSS 

BHP tot 

last 1440 

10,3017 

52 156 1 

DxCH 

MPAC +1 

OTSS 




10,3020 

0 0006 1 

BXTR® 


0T8T 

BEF TOS 

LAST 1440 

10,3021 

3 0160 0 

DCA 

MPAC +3 

OTSS 


26 

last 1440 

10,3022 

SO 064 0 

INDEX 

LOCCTR 

0T89 

BBF T09 

last 1440 

10,3023 

52 160 1 

OXCM 

MPAC +3 

0T9O 

BBP 

2T 

last 1440 

10,3024 

3 0064 0 

CA 

LOCCTR 

0T91 

BEF TIO 

LAST 1440 

10,3025 

54 161 0 

TS 

MPAC +5 

0T92 

BBP 

1 


10,3026 

0 3055 1 

IC 

SAVELOCH 

0T93 




10,3027 

0 0003 1 

BELINT 





20’35 OCT. 28,1988 SATRAP .OOT PAGE 1440 
USBIUS PAOB NO. 21 Eo S4 

LEAVE CNLY PLAaf BIT SET 

DWEDIATE REIUIC4 IS CALL CADR *4 
H4KE DISPLAY CNE HIGHER THAN USER 

IS THIS A PLAaiINO R DISPLAY 


YES, make DSPLAY JOB A VAC 
NO, make DSPLAY JOB A NOvAC 


COPY TEMPS INTO PEHMANENT REGISTERS 
SAVE NVWORD AND USERS MPAC +2 

SAVE users CADR, FLAGS AND EBANK 





I 


ASSE^BLB revision 249 OP AGO PROOBAM COLOSSUS ffif NASA 2021111-041 
DISPLAY INTEHPACB ROUTINES 


20*35 OCT. 26,1968 SATRAP .OOT PAGE 1441 
U®R«S PAGE NO. 22 Bo S4 




0794 

REP 

9 

LAST 1372 

10,3030 

1 4577 1 

TCP 

BAMCJU4P 

CALL CADH +4 

0795 

REP 

3 

LAST 1439 

10,3031 

ss«a4s 0 

OOPERPlR TS 

NOWTIEMl 

desired checklist value 

0798 

REP 

2 

LAST 1439 

10,3032 

3 3824 1 

CAP 

V01N25 

DISPLAYS CHECKLIST VAUB IN R1 

0797 

REP 

24 

LAST 1440 

10,3033 

54 155 1 

OOPEHPRS TS 

PLATTEMl 


0798 

0799 

REP 

REP 

2 

6 

LAST 1439 
LAST 1437 

10.3034 

10.3035 

3 3623 0 

1 2765 0 

CAP 

TCP 

PBRPMASK 

OCDSPRS 

leave cnly flash, perform, blanking 

0600 

REP 

25 

LAST 1441 

10,3038 

54 155 1 

OOPBRP2B TS 

PLAYTSMl 

desired VEHB-NCUN to display B1,R2,R3 

0801 

0802 

REP 

REP 

2 

7 

LAST 1439 
LAST 1441 

10,3037 

10,3040 

3 3627 1 

1 2765 0 

CAP 

TCP 

PEHP2MSK 

OCDSPRS 


0808 

REP 

2 

LAST 1439 

10,3041 

0 3043 0 

GOPERP 4 H TC 

PIIRHS4 


0807 

REP 

8 

LAST 1441 

10,3042 

1 2765 0 

TCP 

OCDSPRS 


0808 

REP 

T 

LAST 848- 

10,3043 

55«131 1 

PUHRS4 TS 

OPTIWl 

desired opticn ccde 

0809 

0810 

REP 

REP 

1 

26 

LAST 1441 

10.3044 

10.3045 

3 3630 1 
54 155 1 

CAP 

TS 

VO 4 NO 6 

PLAYIEMl 


0811 

0812 

REP 

REP 

1 

334 

LAST 1435 

10.3046 

10.3047 

3 3631 0 

0 0002 0 

CAP 

TC 

PERPiMSK 

0 

PLASH, PERPOfW AND BIANK R3 

0813 




10,3050 

0 0004 0 

SAVELOCS INHINT 


0815 

0818 

0817 

0818 

RET 

IfiP 

REP 

REP 

1 

8 

64 

9 

LAST 1440 
LAST 1435 
LAST 1441 

10.3051 

10.3052 

10.3053 

10.3054 

4 3640 1 

7 0160 1 

6 0003 1 
54 160 1 

CS 

MA8K 

AD 

TS 

OCT 34 OO 

PLAyi&U 

BBANK 

PLAYTBLt 

ERANK bits 

0619 

REP 

335 

[AST 1441 

10,3055 

22 002 0 

savelocr lxch 

0 


0820 

0821 

REP 

REP 

6 

1 

LAST 1409 

10.3056 

10.3057 

0 4604 1 
54 157 0 

TC 

TS 

EWkECADR 

PLAYTEMs 


0822 

REP 

10 

LAST 1440 

10,3060 

6 0072 1 

AD 

TC 

ftJPTREGa 

NOT USED FOB NCN R ROUTINES 

0823 

REP 

229 

LAST 1440 

10,3061 

0 0001 0 

L 


0824 

0825 

0826 

0827 

0828 
0829 

REP 

REP 

REP 

REP 

REP 

278 

6 

10 

7 

2 

LAST 1438 
LAST 1439 

LAST 1441 
LAST 1441 
LAST 1435 

10.3062 

10.3063 

10.3064 

10.3065 

10.3066 

10.3067 

3 4714 1 
54 164 0 
0 0004 0 
3 0160 0 
50 164 1 
55«067 0 

COPYNOiW CAP ZERO 

COPIES TS COP INDEX 

COPIES2 INHINT 

CA PLAlfIE44 

INDEX COP INDEX 

TS ebanksav 

FIAWORD 

EailV TO DSPFIO 



ASaseLE BBVISICN 249 OP AGO PROGBAM COLOSSUS BY NASA 2021111-041 
display INTEHPAtS ROUTINES 


20’35 ODT. 28.1968 SATRAP .t»T PAOB 1442 




L 


USERaS PAGB NO. 23 ED S4 




0830 

RES' 

1 


10.3070 

7 3656 0 

MAac 

CADHMASK 

0831 




10.3071 

0 0006 1 

BKTEM) 

0832 

RBP 

1 


10.3072 

1 3076 1 

BzP 

aCIPADD 

0833 

REP 

2 

last 1441 

10.3073 

3 0157 1 

CA 

PLAYTIM3 

0834 

REP 

8 

last 1441 

10.3074 

50 164 1 

INDEX 

COP INDEX 

0835 

REP 

3 

LAST 173 

10.3075 

54 372 0 

TS 

CADflPLai 

0836 

HEP 

2T 

last 1441 

10.3076 

3 0155 0 

SKIPADO CA 

PIAYTH41 

08 3T 

REP 

9 

last 1442 

10.3077 

50 164 1 

INDEX 

COP INDEX 

0838 

REP 

1 


10,3100 

54 387 1 

TS 

NwrOHD 

0842 

REP 

1 


10.3101 

1 3357 1 

TCP 

BEL INTO 

0843 

HEP 

10 

LAST 1442 

10.3102 

50 164 1 

OOSLBBPS INDBX 

COP INDEX 

0844 

REP 

2 

last 1435 

10.3103 

3 3857 0 

CA 

PRIOOCT 

0845 

REP 

1 


10.3104 

7 3106 1 

HAa< 

WAITMAac 

0848 

REP 

1 


10.3105 

0 7717 1 

IC 

UPeiT2 

084T 




10.3106 

03004 0 

WAITMASK OCT 

3004 

0848 

REP 

167 

last 1438 

10.3107 

4 4712 0 

Cs 

CNE 

0849 

REP 

11 

last 1442 

10.3110 

6 0164 1 

AD 

COP INDEX 

0850 

REP 

1 


10.3111 

54 154 0 

TS 

PACEHEG 

0851 

REP 

2 

last 1442 

10.3112 

50 154 1 

XCHSLPBP INDEX 

PACERSO 

0852 

REP 

1 


10.3113 

3 3836 1 

CAP 

WAkECADR 

0853 




10.3114 

0 0004 0 

IIWINT 

0854 

HEP 

10 

last 1439 

10,3115 

0 5074 1 

TC 

JCBwAkE 

0855 

REP 

3 

last 1439 

10.3116 

0 3 350 1 

TC 

XCHTOEND 

0858 

RES' 

3 

last 1442 

10.3117 

SO 154 1 

INDEX 

FACEREG 

0859 

REP 

2 

last 1442 

10,3120 

3 3836 1 

CAP 

WAkECADR 

0860 

REP 

T 

last 1409 

10,3121 

1 5070 1 

TCP 

JOBSLEEP 

0861 

REP 

4 

last 1442 

10,3122 

54 154 0 

JORXQIS TS 

PACEREG 

0862 

REP 

3 

LAST 1439 

10,3123 

0 3333 1 

TC 

WITCHCNE 

0863 

RS' 

11 

last 1442 

10,3124 

0 5074 1 

TC 

jobwake 

0864 

REP 

5 

last 1442 

10,3125 

3 0154 1 

CA 

FACEREG 

0865 

REP 

28 

last 1440 

10.3126 

SO 064 0 

INDEX 

locctr 

0866 

REP 

6 

last 1442 

10,3127 

54 154 0 

TS 

FACSRBG 

086T 

REP 

1 


10,3130 

3 3143 1 

CAP 

XCHOADO 

0868 

REP 

1 


10,3131 

0 335 1 0 

TC 

XCHNYLOC 

0869 

REP 

7 

last 1442 

10,3132 

50 154 1 

INDEX 

FACEREG 

08T0 

REP 

1 


10,3133. 

3 3660 1 

CA 

MAhcOCT 

08T1 

REP 

1 


10,3134 

7 3662 1 

mask 

IDLBSLEP 

0BT2 

REP 

1 


10,3135 

0 7735 1 

TC 

DOWNB4T2 

08T3 




10,3136 

74004 0 

IDLiNASK OCT 

74004 


PLASH AND OODSPHBT 


VERB NOW 


CAOffiS awakened job to GO to endopjob 

REPLACE SA.'E CADR BUT NEW JtB AREA 

CtHTROLS TYPE OF DISPLAY PMT TO S-ffiP 



* dcnt mcve 





ASSBCU BBVIalOC 249 OP AOC paOORAM COLOSSUS BY NASA 2021111-041 

DisrtAT maiPAOB boutines 


20’35 C»T. 28,1988 


PACE 1443 


USESUS PACE NO. 24 Eo S4 


8 lAST 
« LAST 
22 LAST 
2 LAST 
1 

19 LAST 
3S LAST 
400 lAST 
2 LAST 

2 last 


10,3137 

10.3140 

10.3141 

10.3142 

10.3143 

10.3144 

10.3145 

10.3146 

10.3147 
10,3150 


50 154 1 
3 4706 1 

6 4710 0 
0 7717 1 

03112 0 
3 0100 0 

7 4710 1 
10 000 0 

0 2530 0 

1 2664 0 


IMEX PACSBBO 

CA BITS 

AD POUR 

IC UPa4T2 

XCHOIDD CBJADR XWSLPEP 
C4 PLACimD4 

HA* BIT3 

CCS A 

GBMMac 1C HAHCPLAY 

TCP CKTOCOPY 


bit aicws PRIO DTISRHUPTED NORM OB MARK 
bits pob mahc, bit4 por normal 


PLAO ROUTINE DOBS RELINT 
♦ DCNT MOVE 


IP BIT3 IHHL marc OVER NORM 


USED AS GENADR POR JOBrAkE 


279 LAST 1441 
2 LAST 1435 


10.3151 3 4714 1 MAROWAkE CAP 

10.3152 54 160 1 WArEPLAY T3 


ZERO 

TH4POR2 


LAST 1443 


23 LAST 1443 
2 LAST 1442 


10.3153 50 160 0 

10.3154 3 3652 0 


10.3155 

10.3156 

10.3157 


6 4710 0 ad 

0 7735 1 1C 

40010 1 MARCPMSC OCT 


INDEX TH4POB2 

CA BITSStll 

AD POUR 

1C DOWNENT2 

OCT 40010 


=mOOIT MOVE 


0891 HH' 4 LAST 1443 

0892 WE 3 last 1442 

0893 

0894 BBP 12 LAST 1442 


10,3160 50 160 0 

10,316 1 3 3636 1 

10.3162 0 0004 0 

10.3163 0 5074 1 


INDEX lEMPORz 
CAP wakecadh 

INHINT 

TC JCBwAkE 


10,3164 1 3463 1 


B0896 all .1 HBSWRTS BRANCH DIRECTLY TO INITDSP. NORMAL DISPLAYS ARB THECNLY DISPLAYS ALLOWED TO USE .1 RESTARTS 

R 0898 WriDSP FIRST RESTORES THE EBANK AND THE SUPERBANK TO THE MOST REGENT NORMAL EBANK AND SUPEHBANK. 

H0900 BE THE MOST RECENT NORMAL DISPLAY RECXBST WAS NOT FINISHED, CCNTROLIS SENT BACK TO THE lAST NORMAL USER. 

R0902 OB«B»ISB THE NORMAL DISPLAY SET UP IN THE NORMAL DISPLAY REDS IS STARTSD UP IMMEDIATELY. 


0904 

bbf 

4 

LAST 

1438 

10,3165 

3 1071 

0 

INITDSP CA 

EBANKTEM 

RESTORE MOST HECECT NORMAL HIANK 

0905 

BBE 

«5 

LAST 

1441 

10,3186 

54 003 

0 

T3 

EBANK 


0906 

BHP 

4 

LAST 

1439 

10,3167 

3 0366 

1 

CA 

RBSTRBG 

superbank and jcb priority 

0907 

WE 

1 



10,3170 

0 4666 

0 

TP 

9UPEHSW 

RESTORE SUPEHBANK 

ogos 

WE 

5 

LAST 

1440 

10,3171 

7 7674 

1 

MASK 

PRI03T 


0909 

WE 

11 

LAST 

1438 

10,3172 

0 5103 

0 

TC 

PRIOQING 


0910 

■BE 

49 

LAST 

1440 

10,3173 

4 6214 

1 

CS 

THREE 


0911 

WE 

4 

LAST 

612 

10,3174 

6 0374 

i 

AO 

TEMPFLSH 


0912 

WE 

10 

LAST 

1441 

10,3175 

1 4577 

1 

TCP 

bank JUMP 


0913 





10,3176 

0 0003 

1 

PINBHNCH RELINT 


POB GOP IN USERS 

09135 

■BE 

1 



10,3177 

3 1072 

0 

CA 

MARK2PAC 

NEEDED TO SAVE MPAC *2 FOR MARK USERS 

0914 

RBE Til 

lAsr 

1440 

10,3200 

54 156 

1 

TS 

MPAC +2 

CM,Y 

0915 

■EE 

20 

LAST 

1443 

10,3201 

3 0100 

0 

CA 

PLAOWRD4 

PINBRANCH CONDITION 






20’35 OCT. 28,1968 SATEWP .OOT PMJB 1444 



ASSeCLB BBVISIOi 249 OP AQC PROCSIAM CCU13SUS BY (MSA 2021111-041 


L 

DISPLAY 

imsRPACE RamiNEs 





USR.S PAOB NO. 2S Bo S4 

0916 

REP 

1 


10,3202 

7 7707 1 


mask 

PDMAai 


091T 

REP 401 

LAST 1443 

10,3203 

10 000 0 


CCS 

A 


0918 




10,3204 

1 3207 0 


TCP 

♦3 


0919 

REP 

1 


10,3205 

1 3617 0 


TCP 

ERA SR 

** NOIHINO IN BTOIDLE 

0920 

REP 

3 

LAST 1443 

10,3206 

1 2530 1 


TCP 

MAnCPlAY 


0921 

REP 

54 

LAST 1414 

10,3207 

0 5435 0 

NCWBNCH TC 

UPPIAO 

»T pinbranch bit 

0922 

REP 

i 


10,3210 

00105 0 


AORBS 

PINBRPLO 


0923 

REP 

83 

LAST 143T 

10,3211 

3 4675 1 


CAP 

BIT14 

PRIO INTEHOIPTH) 

0924 

REP 

21 

LAST 1443 

10,3212 

7 0100 1 


HAac 

PLAOm»4 


092S 

REP 

402 

LAST 1444 

10,3213 

10 000 0 


CCS 

A 


0926 

REP 

1 


10,3214 

1 2672 1 


TCP 

KBBPPRIO 


092T 

HEP 

1 


' 10,3215 

1 2743 1 


TCP 

PLAYJUMl 


0928 

REP 

1 


10,3216 

0 2550 0 

NVDSP 

TC 

COPYPACS 


09281 

■ HEP 

5 

LAST 1443 

10,3217 

3 0160 0 


CA 

TB4POR2 

SET UP blank bits FOR NVMCNOPT IN CASE 

09282 

REP 

23 

LAST 1410 

10,3220 

7 4718 1 


MASK 

ffiVBl 

UffiR REQUESTS BLANKING MCNITOR 

09283 

HEP 

230 

LAST 1441 

10,3221 

54 001 1 


T3 

L 


0929 

lEP 

51 

LAST 1411 

10,3222 

4 4676 0 


CS 

BIT13 


0930 

HEP 

12 

LAST 1442 

10,3223 

SO 164 1 


INDEX 

COP INDEX 


0931 

REP 

1 


10,3224 

7 1067 0 


MASK 

DSPFLO 


0932 

HEP 

13 

LAST 1444 

10,3225 

50 164 1 


INDEX 

COP INDEX 


0933 

REP 

2 

LAST 1444 

10,3226 

55«067 0 


T3 

DSPFLO 


0934 

REP 

32 

last 1410 

10,3227 

7 4703 0 


MASK 

BITb 

bits set ip DEC MARK PERFORM DISPIAY 

0935 

HEP 

5 

LAST 1145 

10,3230 

54 141 1 


T3 

TBAl 


0936 

REP 

712 

LAST 1443 

10,3231 

3 0156 0 


CA 

MPAC *2 


093T 

REP 

2 

LAST 1435 

10,3232 

54 185 1 


TS 

MPAC2SAV 


0938 

REP 

2 

LAST 1443 

10,3233 

55«072 1 


T3 

MAHK2PAC 

♦ FOR DISK CNLY * 

0939 

REP 

14 

LAST 1444 

10,3234 

50 164 1 


INDEX 

COP INDEX 


0940 

HEP 

2 

lAST 1442 

10,3235 

10 367 1 


CCS 

NVWOBD 


0941 

REP 

1 


10,3236 

1 3245 0 


TCP 

NVDSPl 


0942 

REP 

1 


10,3237 

1 3361 1 


TCP 

CLEANBOT 


0943 

REP 

4 

last 1436 

10,3240 

4 0370 1 


Cs 

MARW 


0944 

REP 

5 

LAST 1444 

10,3241 

54 370 1 


TS 

MARW 

IN CASE MARKPLAY AWAKENED APIER SI.EEPIN 

0945 

REP 

12 

LAST 1405 

10,3242 

7 6043 1 


MASK 

LOrr 


0946 

REP 

1 


10,3243 

6 3643 0 


AD 

VOSNOOMl 


094T 

REP 

6 

LAST 1444 

10,3244 

6 0141 0 , 


AD 

TfMl 


0948 

REP 

168 

LAST 1442 

10,3245 

6 4712 1 

NVDSPl 

AD 

CUE 


0949 

REP 

1 


10,3246 

0 4171 1 

NV50DSP 

TC 

NVMCHOPT 


0950 

REP 

1 


10,3247 

1 3373 1 


TCP 

REST 

IF Busy 

0951 

REP 

6 

LAST 380 

10,3250 

b 4447 1 


TC 

PLAaiQPP 

IN CASE OP EXTENDED VERB NCN PIASH 

0952 

REP 

1 


10,3251 

0 2546 1 


TC 

COPYTOGO 

MPACS DESTROYED BY NVSUB 





I 


ASSB«LB REVISION 249 OP AOC PKOOBAM COLOSSUS BY NASA 2021111-041 
DISPLAY IWIERPACB HOUTINES 


20’35 OCT. 28,1968 SATRAP .007 PAGE 1445 
USBRxS PAGE NO. 26 Eo 34 



0953 

REP 

58 

LAST 1416 

0954 

REP 

1 


09541 

REP 

59 

LAST 1445 

09542 

REP 

1 


09543 

REP 

60 

LAST 1445 

09544 

REP 

1 


0955 

REP 

6 

LAST 1444 

0956 

REP 

2 

LAST 351 

0957 

REP' 

1 


0958 

IfflP 

47 

LAST 1443 

0959 

REP 

7 

lAST 1445 

0980 

REP 

403 

LAST 1444 

0961 

REP 

1 


0962 

REP 

56 

LAST 1440 

0963 

REP 

8 

LAST 1445 

0964 

REF 404 

LAST 1445 

0965 

REP 

1 


0966 

REP 

9 

LAST 1445 

0967 

REP 

56 

LAST 1436 

0968 

REP 

405 

LAST 1445 

0969 

REF 

1 


09691 

REP 

15 

LAST 1444 

09692 

REP 

4 

LAST 1442 

09693 

REP 

713 

LAST 1444 

09694 

REP 

1 


0972 

REP 

16 

LAST 1445 

0973 

REP 

3 

LAST 1444 

6974 

REP 

13 

LAST 1444 

0975 

0976 

REP 

2 

LAST 1445 

6977 

REP 

111 

LAST 1435 

0978 

REP 

10 

LAST 1445 

0979 

REP 

52 

LAST 1444 

0980 

REP 

406 

LAST 1445 

0981 

REP 

1 


0982 

REP 

53 

LAST 1445 

0983 

REF 

17 

LAST 1445 

0984 

REF 

3 

LAST 1444 

09845 

0985 

0986 

REF 

1 



10,3ZS2 

10.3253 

10.3254 

10.3255 

10.3256 
10,325T 

10.3260 

10.3261 

10.3262 

10.3263 

10.3264 

10.3265 

10.3266 

10.3267 

10.3270 

10.3271 

10.3272 

10.3273 

10.3274 

10.3275 

10.3276 

10.3277 

10.3300 

10.3301 

10.3302 

10.3303 

10.3304 

10.3305 

10.3306 

10.3307 

10.3310 

10.3311 

10.3312 

10.3313 

10.3314 

10.3315 

10.3316 

10.3317 

10.3320 

10.3321 

10.3322 


0 5447 0 
00102 1 
0 5447 0 

00103 0 
0 5447 0 

00104 1 
3 0160 0 

0 4271 1 

1 3216 0 
3 4706 1 
7 0160 1 
10 000 0 
1 3311 0 

3 4707 0 
7 0160 1 
10 000 0 
1 3406 1 

4 0160 1 
7 4705 0 
10 000 0 
1 3303 0 

50 164 1 
3 0372 1 
54 157 0 
1 3501 1 

50 164 1 
3 0367 0 
7 6043 1 
0 0006 1 
1 3406 1 

1 5112 1 

3 0160 0 
7 4676 0 
10 000 0 
1 3267 0 

3 4676 1 
50 164 1 
27«067 0 

22 007 0 
0 0008 1 
6 2571 0 


IC 

DCMNPLAa 

IWSET SLEEPING BITS 

ADRES 

MHKNVPLO 


TC 

DORNPLAO 


ADRES 

NMWPLO 


TC 

DORNFLAO 


ADRES 

PRCNVPLO 


blankCHk ca 

TB4POR2 

BLANK bits 1,2,3 IP SET 

IC 

blanksub 


TCP 

NVDSP 


PBHFCHEIC cap 

bits 

BIT 5 POR PEHPOIW 

M»SK 

TH4POR2 


CCS 

A 

IS THIS A GOPEBP DISPLAY 

TCP 

iSTORa© 

YES 

OCWNIDLE CAP 

BIT4 


mask 

T04POH2 


CCS 

A 


TCP 

PLAWSUB 

IT IS 

CS 

T©1P<»2 

IS THIS A GODSPRET 

MASK 

B1T6 


CCS 

A 


TCP 

ISITNOO 


INDEX 

COP INDEX 


CA 

CADRFLSI 


TS 

MPAC +3 


TCP 

B©IT 


ISITNOO INDEX 

COP INDEX 

IS THIS A PASTE 

CA 

NVWOHD 


Miac 

LOR7 

CHECK MADE FOR PINBRNCH AND PRIG CN MAIK 

EXT©© 

BZP 

PLASHSOB 

YBS, Asaj« PASTS ALWAYS CK PtASi 

TCP 

ENDQPJCB 

NOT PLAS^, NOT GOPERP, 1HERPORB RJCIT 

1STOR2ND CA 

T©4P0R2 


MASK 

BITT3 


CCS 

A 


TCP 

GCANIDLE 

SeCCND 

CA 

81113 


INDEX 

COP INDEX 


ADS 

DSPPm 


ZL 

EXT©© 

IS TT 

BZMP 

margperf 

YES 



HI 


ASSBmX RBV^ISKK 249 OK AOC mOCIRAM COLOSSUS BY NASA 2021111-041 
DISMAY INIBtnUS MUTIMBs' 


0987 

098TI 

BP 

3S 

I^ST 1381 

098T2 

DEI' 

1 


098T4 

REP 

20 

LAST 6T8 

098T41 REP 

1 


0B8T5 

RE8P 

2 

last 1438 

0988 

REP 

1 


0989 

RS' 

3 

LAST 1448 

0990 

0991 

RBP 

48 

last 1445 

0992 

HEP 

3S 

IAST 1418 

0993 

RBP 

22 

last 1444 

0994 

BBE 

1 


0995 

RBP 

40T 

last 1445 

0996 

RBP 

189 

last 1444 

099T 

RBP 

231 

LAST 1444 

0998 

RBP 

280 

last 1443 

0999 

RBP 

232 

LAST 1448 

1000 

RBP 

11 

LAST 310 

1001 

1002 

RBP 

338 

last 1441 

1003 

RBP 

6 

LAST 380 

1004 

1005 

RBP 

29 

last 1442 

1006 

RH' 

2 

LAST 1442 

lOOT 

RBP 

30 

LAST 1446 

1008 

RBP 

31 

last 1446 

1009 

RBP 

42 

last 1401 

1010 

1011 

RBP 33T 

LAST 1446 

1012 

HH' 

5 

LAST 111 

1014 

REP 

33 

last 1381 

lOlS 

REP 

2 

last 180 

1018 

RBP 

1 


1016 

RBP 

1 


lOlT 

RQ' 

3 ' 

LAST 1445 

1018 

REP 

23 

last 1446 

1019 

1020 

RBP 

1 


1021 

REP 

2 

LAST 1437 


1022 BBP 112 LAST 1445 


10,3323 

1 4677 1 

MAK 

B1T12 

10.3324 

0 0006 1 

Bxiao 

10,3325 

1 3331 1 

B2P 

V50PAS1E 

10,3326 

4 1145 1 

CS 

NVWOHDl 

10,3321 

6 3667 0 

AO 

V9TNOO 

10,3330 

1 3246 0 

TOP 

NVSODSP 

10,3331 

3 3828 0 

V50PAS1E CAP 

V50N00 

10,3332 

1 3246 0 

ICP 

NY50DSP 

10,3333 

4 4706 0 

WIlCMCNE Cs 

bits 

10,3334 

0 0006 1 

BKiaO 

10,3335 

03 011 1 

■AM) 

DSALMOUT 

10,3336 

3 0100 0 

CA 

PIA(X|HD4 

10,3337 

1 3844 0 

BA* 

NVBUSISK 

10,3340 

10 000 0 

CCS 

A 

10,3341 

3 4712 1 

CAP 

(ME 

10,3342 

54 001 1 

TS 

L 

10,3343 

3 4714 1 

CAP 

ZERO 

10,3344 

SO 001 0 

index 

L 

10,3345 

57«042 0 

xch 

CADRSTOR 

10,3346 

0 0004 0 

D«INT 

10,3347 

0 0002 0 

ic 

O 

10,3350 

3 4233 1 

XCHTOBND CAP 

END INST 

10,3351 

56 064 0 

XCHNYLOC xCH 

LOCCth 

10,3352 

0 0006 1 

BXTE® 


10,3353 

6 3357 0 

B»t» 

BEL INTO 

10,3354 

56 064 0 

XCH 

LOCCTR 

10,3355 

50 064 0 

INDEX 

LOCCTR 

10,3356 

54 164 0 

TS 

LOC 

10,3351 

0 0003 1 

HELLNTO rblint 


10,3360 

0 0002 0 

1C 

O 

10,3381 

3 7667 1 

cleanbjto cap 

PRI032 

10,3382 

0 5042 1 

ic 

PINDVAC 

0371 


EBAMc= 

NYSAVE 

10,3383 

04245 0 

2CADR 

JAJWIER'I 

10,3384 

04100 1 



10,3365 

1 3407 0 

TCP 

PLASHSUB . 

10,3366 

3 0100 0 

ISITPRIO CA 

PIAOwflDl 

10,3367 

7 3414 1 

MAac 

ITISNAac 

10,3370 

0 0006 1 

BXIK® 


10,3371 

1 2723 1 

BzP 

PRIGBORT 

10,3372 

1 5112 1 

TCP 

ENDOPJOB 



20’35 OOT. 28.198B SAIHAP .OOT PAGE 1446 
USBRaS PAOS NO. 2T Bo S4 

NVO»HDi= -0 IS V9T. NVWOHDl= -400 IS V99 

DISPLAY SBCOX) PART OP OOFBRP 
TUIN QPP key release LIOTT 

IS IT NVSUB ASLBBP 


IC BTOQPJOB REPLACES GEMDR IN LOG FOB 
WAS THIS ADDRESS SEEPI.'KS 

NO 

YES 


back to user 

CNE LOWER THAN DISPLAYS SLEEPING 




IS pinbrflg, marcidflg set 



AssaetB levisioN 249 op *ac procsiam colossus by kasa 2021111-041 

DISPLAY mBRPACB RQUTINBS 


1023 

HEP 

12 

LAST 1446 

10,3373 

1024 

BBSP 

113 

LAST 1448. 

10,3374 

102S 

lep 

1 


10,3375 

1020 

HEP 

114 

lAST 1447 

10,3378 

1027 

HEP 

2 

LAST 1435 

10,3377 

1028 

HEP 

1 


10,3400 

1029 

1038 

rep 

3 

LAST 1443 

10.3401 

10.3402 

1031 

HEP 

16 

LAST 1445 

10,3403 

1032 

HEP 

1 


10,3404 

1033 

HEP 

2 

LAST 378 

10,3405 

1034 

HEP 

■ 4 

LAST 359 

10,3406 

1035 

rep 

19 

LAST 1447 

10,3407 

1038 

HEP 

1 


10,3410 

1037 

HEP 

3 

LAST 1447 

10,3411 

1038 

HEP 

1 


10,3412 

1039 

1040 

HEP 

4 

LAST 1447 

10.3413 

10.3414 

1041 

REP 

2 

LAST 188 

10,3415 

1042 

REP 

20 

LAST 1447 

10,3416 

1043 

HEP 

37 

LAST 1443 

10,3417 

1044 

REP 408 

LAST 1446 

10,3420 

1045 

RBP 

1 


10,3421 

1040 

HEP 

13 

LAST 1447 

10,3422 

1047 

1048 

neap 

1 


10.3423 

10.3424 

1049 

RBP 

2 

LAST 1447 

10,3425 

1050 

IBP 

1 


10,3426 

1051 

BKP 

1 


10,3427 

1052 

EBP 

1 


10,3430 

1053 

IBP 

1 


10,3431 

1054 

1055 

IBP 

714 

LAST 1445 

10.3432 

10.3433 

1050 

1057 

HEP 409 

LAST 1447 

10.3434 

10.3435 

1058 

EBP 

1 


10,3436 

1059 

IBP 

77 

LAST 1439 

10,3437 

1000 

IBP 

1 


10,3440 


11-042 

1 

BEST CCS 

CAOTSTOR 

1 5112 

1 

TCP 

BOGPJCB 

1 3377 

0 

TCP 

HBSTSLEP 

1 5112 

1 

TCP 

PNDCPJCB 

3 0162 

1 

HBSTSLEP CA 

cesMAac 

7 3845 

1 

MA* 

ASTRCMSK 

0 7717 

1 

TC 

UPe»T2 

24100 

0 

OCT24100 OCT 

24100 

50 184 

1 

INDEX 

COP INDEX 

3 3635 

1 

CAP 

NVCADR 

0 4456 

1 

TC 

NVSIEUSY 

0 4443 

0 

PlAaiSUB TC 

PLA9ICN 

3 0164 

1 

CA 

COP INDEX 

54 157 

0 

TS 

COPMPAC 

3 0162 

1 

CA 

GBC4Aa< 

7 3136 

i 

mask 

IDLE4ASK 

0 7717 

1 

TC 

UPeiT2 

40040 

1 

ITISAASK OCT 

40040 

3 1073 

\ 

CA 

RlSAVE 

50 164 

1 

INDEX 

COP INDEX 

7 4710 

1 

MAa< 

BIT3 

10 000 

0 

CCS 

A 

1 3506 

0 

TCP 

LN®TRl' 

11«042 

1 

CCS 

CADHSTOR 

1 3366 

0 

TCP 

ISITPBIO 

1 3426 

0 

TCP 

♦2 

1 3366 

0 

TCP 

ISITPRIO 

0 4223 

0 

TC 

ENDIME 

1 3520 

1 

IDLERBTl TCP 

TEHMATE 

1 3537 

1 

TCP 

PROCEED 


26 0 0 0 0 
0 0006 1 
1 3607 1 
3 4711 1 
54 161 0 


CS LOWIXWD 

AD MPAC 

BCIBTO 
DIM A 

ExTBTO 

BzF LOJDITIS 

CKTORYT CAP THrO 

ENDQJT TS OriHEBE 


20*35 OCT. 28,1968 SATRAP .007 PAGE 1447 
USeSUS PAGE NO. 28 BO S4 


IS SOeCNB IN a^DIDLE 
YES 


®T NVSLSEP BITS 


*** DCNT MOVE 


BUSY OR ABORT IP ILLEGAL 


COP INDEX DESTROTED BY END IDLE 


*4* aroiDLE AUXW *** DCNT MOVE 
IS THIS A REPEAT AND RETURN DISPLAY 


SEE IP SChECNB ALREADY IN ENDIDLB 


EJNDIDIE RETURNS HERE CN PROCEED 


V21 OR V22 OR V23 CN DSKY 


I 




AsaSetB RBV^ISION 249 CF AOC PnOQElAM CCLXiSSUS BT NASA 2021111-041 


20’35 OCT. 28,1908 SATEWP .OOT PAOB 1448 




DISPIAY IN1SRPACB ROin-INES 


USbtS PACB NO. 29 Bo S4 


1061 

BB' 

24 

last 1446 

10,3441 

3 0100 0 


CA 

PIAQ(IHD4 

1062 

tBP 

15 

IAST 13T9 

10,3442 

7 4105 0 


Wise 

OCTBOOOO 

1063 

BBP 410 

last 1447 

10,3443 

10 000 0 


CCS 

A 

1064 

RBP 

1 


10,3444 

1 3447 1 


TCP 

TIMECHQC 

1065 

ISP 

1 


10,3445 

1 3555 0 


TCP 

NOlWRET 

1066 

US' 

1 


10,3446 

1 3541 0 


TCP 

MAROBT 

106T 

ur 

23 

cast 1438 

10,3447 

4 0025 1 

TI?«JffiK CS 

TIMBl 

1068 

IBP 

2 

LAST 1438 

10,3450 

6 1147 1 


AO 

PRIOTISe 

1069 

IBP 411 

LAST 1448 

10,3451 

10 000 0 


CCS 

A 

lOTO 




10,3452 

4 0000 0 


CCM 


lOTl 

IBP 

S 

LAST 1384 

10,3453 

6 7700 1 


AD 

OCT37776 

1072 

IBP 

170 

LAST 1446 

10,3454 

6, 4712 1 


AD 

CNB 

1073 

IBP 

1 


10,3455 

6 3677 1 


AD 

-2ffiC 

1074 




10,3456 

0 0006 1 


EXTBO 

1075 

HP 

2 

last 1444 

10,3457 

6 2672 0 


B®1P 

KEEPPRIO 

1076 

IBP 

2 

LAST 1448 

10,3460 

1 3555 0 


TCP 

NOBMRET 

1064 

IBP 

171 

LAST 1448 

10,3461 

3 4712 1 

noetwke cap 

(KB 

1085 

IBP 

1 


10,3462 

1 3152 0 


TCP 

WAkBPLAY 

1086 

IBP 

2 

LAST 1447 

10,3463 

10 161 0 

©©RgT 

CCS 

OUTHERE 

1087 

IBP 1T2 

LAST 1448 

10,3464 

6 4712 1 


AD 

(KE 

1088 



■ 

10,3465 

1 3467 0 


TCP 

♦2 

1089 

HEP 

115 

last 1447 

10,3466 

1 5112 1 


TCP 

EHDOPJOB 

1090 

HBP 

2 

LAST 1447 

10,3467 

50 157 1 


INDEX 

COPMPAC 

1091 

IBP 

5 

last 1445 

10,3470 

6 0372 1 


AD 

CADHFLai 

1092 

HHP T15 

LAST 1447 

10,3471 

54 157 0 


TS 

MPAC +3 

1093 

IBP 

4 

last 1447 

10,3472 

3 0162 1 


CA 

GBNMASK 

1094 

HEP 

1 


10,3473 

7 3475 0 


MASK 

PINIDMSK 

1095 

HEP 

3 

last 1443 

10,3474 

0 7735 1 


TC 

DCWNENT2 

1096 




10,3475 

74044 1 

PINIDMSK OCT 

74044 

1097 

HEP 

50 

LAST 1443 

10,3476 

4 6214 1 


CS 

THREE 

1098 

HEP 

2 

LAST 231 

10,3477 

0 4170 0 


TC 

NYSUB 

1099 




10,3500 

1 3501 1 


TCP 

♦1 

1100 

HBP 

3 

LAST 1439 

10,3501 

3 0163 0 

ENDIT 

CA 

USERPRIO 

1101 

REP 

6 

last 1443 

10,3502 

7 7674 1 


mask 

PRI03T 

1102 

REP 

12 

last 1443 

10,3503 

0 5103 0 


TC 

PRIOCHNO 

1103 

HBP 716 

LAST 1448 

10,3504 

3 0157 1 


CA 

MPAC +3 

1104 

HBP 

11 

last 1443 

10,3505 

1 4577 1 


TCP 

bank JIMP 

1105 

WP 

21 

LAST 1447 

10,3508 

50 184 1 

UNSBTRl 

INDEX 

COP INDEX 

1106 

tey 

38 

LAST 1447 

10,3507 

4 4710 1 


CS 

BIT3 

1107 

teF 

3 

last 1447 

10,3510 

7 1073 0 


mask 

RlSAvE 

1108 

HBP 

4 

LAST 1448 

10,3511 

55«073 0 


TS 

RlSAvE 


CHECK naujhb op ehdidle bbtubn 


PHIO S4DIDLE RETURN 
NOIMU, esDIOLB HBTUIW 
MARC B4DIOLE BEIUre< 


NOIMAL eroiDLE EXIT 


H04CVE END IDLE AND P INBRANCH BITS 


*** DCNT .HCVB 


# 


blank BVERYIHING EXCEPT W 


return TO U®RS PRIORITY 


reset repeat and return REajEST 


I 




10 


ASS®«LB IBVISICH 248 OP AOC PROfflAM CQU>3SU3 BY NASA 2021111-041 
DISPLAY WIBaPAOB ROUTINES 


1109 HEP Ml 1446 

1110 BEP 2 lAST 1443 

1111 US' 51 IAST 1448 

1112 REP 22 lAST 1448 

1113 REP 6 IAST 1448 

1114 REP 12 IAST 1448 

1115 REP 282 IAST 1449 

1118 I®P 1 


HIT 

1118 

1119 

1120 
•1121 
1122 

1123 

1124 

1125 

1126 

1127 

1128 
1129 

R1130 

1132 

1133 

Rll3e 

B1140 

R1142 

R1143 

R1145 

R114T 

B1149 

1163 

1164 

1165 

1166 

116T 

1168 

1169 

IITO 


IffiP 11 
REP 84 
REF 412 
REP 4 
REP 3 
REP 23 
REP T 


IAST 1441 
LAST 1444 
LAST 1448 
LAST 13T2 
LAST 1442 
LAST 1449 
LAST 1449 


RBF 338 LAST 1446 
REP 12 LAST 381 
REP 116 LAST 1448 
REP 339 LAST 1449 


10.3512 

10.3513 

10.3514 

10.3515 
10,3518 
10,3517 

10.3520 

10.3521 

10,35 22 
10,35 23 
10,3524 
10,3523 

10.3526 

10.3527 

10.3530 

10.3531 
10,35 32 

10.3533 

10.3534 

10.3535 

10.3536 


3 4714 1 

0 4666 0 

3 6214 0 
50 164 1 
6 0372 1 

1 4577 1 

3 4714 1 
1 3440 0 


CAP 

TC 

-1 CAP 

IM-EDHBT INDEX 
AO 
TCP 

tehmate cap 

TCP 


2EHO 

supers* 

THREE 
COP INDEX 
CADRPL9H 
BANKJUMP 

ZERO 

BJDOUT 


20*35 OCT. 28,1968 SATRAP .007 PAGE 1449 

USERaS PAOE NO. 30 E0-S4 

*** 205 WLY MARKBHAN USERS IN 
SUPEBBANK 0 

return to users I»«DIATE RETUIW LOC 


ASTRCNAUT TERMINATE (V34) RETUIWS TO 


4 0160 
7 4675 
10 000 
1 6706 
4 0157 
50 164 
6 0372 
0 0006 
1 3534 


LINUSCHR CS PLAYTB44 


0 0002 0 
11«012 1 
0 5112 0 
0 0002 0 


HASC 

BIT14 


CCS 

A 


TCP 

0*1 

NO 

CS 

P1AYTEM3 

YES, 

INDEX 

COP INDEX 


AD 

CADRPLSH 


BXTBJD 

BZP 

*2 

YES 

TC 

0 

NO 

CCS 

DSPLOCk 

IS ' 

TC 

ESJDOPJCB 

BJD 

TC 

0 



IS THIS A LINUS 


YES, IS IT ALREADY IN EMIIDLE 


ITS ALREADY ACTIVE 


REP 2 LAST 1449 10,3540 1 3440 0 TCP BJDOUT 

. .V <a?P TP f 1 ) THE LAST N0R4AL DISPIAY WAS EITHER INTERRUPTED BY A PRIO OR A MARK (MARK 

CCUUD^^^PPEN DURING PINBHANCH) OR IP ( 2 ) THE IAST N0R4AL DISPLAY WAS HEOUESTED WHILE A HIOIBR PRIORITY 
DISPLAY WAS GOLNO RESULTING LN THE NORMAL BEING PUT TO SLEEP. 

TO oi-oipa fw -nw ABfVP 9 CCNDITICNS EXISTS . THE NCSWAL DISPIAY IS AwAkENHJ TO GO TO PLAYJLMl WHICH pARTS 

^ ^SE rCCNDITICNS DO NOT EXIST, CCNTRCL GOBS TO PlAYJlWl WHIW IS 
THE RECENT NORvlAL DISPIAY IS ALREADY IN-ENDIDLE(IXJRING A 

TIED AS A .1 restart. 


REP 

REF 


LAST 1391 
LAST 1448 


REP 28 last 1449 


REP 2 last 1443 


BEP 

REP 


LAST 1402 
LAST 1448 


RBSTftRT 

has OCCURRH) and the display can be 

10j3541 

4 6211 

1 

MAROIBT C3 

SIX 

10,3542 

T 0100 

1 

MASK 

P1AGWRD4 

10,3543 

0 0004 

0 

INHINT 


10,3544 

54 100 

1 

TS 

PIAOWBD4 

10,3545 

0 0003 

1 

RELINT 


10,3546 

1 3463 

1 

TCP 

BJDBET 

10,3547 

3 7716 

0 

mahkover cap 

MINUSl 

10,3550 

54 161 

0 

TS 

ouihere 


*** MAY MOVE DISPLAY FLAOwOBD OUT OF 

INHINT REALM 

ajPTREGz IS - MEANS ENDOPJOB TO ENDRET 



20’35 OCT. 28,1968 SAXBAP .007 PAOB 1450 


III 


ASSMLB revision 249 OP AOC HWSMM COLOSSUS BY NAS* 2021111-041 
DISPUVY INTERPACB RDUTIlffiS 


llTl 

BBP 

27 

IAST 1449 

10,3551 

3 0100 0 

11T2 

RHP 

IS 

IAST 1372 

10,3552 

7 4371 1 

11T3 

BSP 

413 

IAST 1449 

10.3553 

10 000 0 

11T4 

HP 

1 


10,3554 

1 3207 0 

11T5 

RES' 

28 

LAST 1450 

10,3555 

3 0100 0 

1176 

RBP 

2 

last 1443 

10,3550 

7 3652 1 

IITT 

RBP 

414 

LAST 1450 

10,3557 

10 000 0 

1178 

RBP 

1 


10,3580 

1 3151 0 

1179 

RHP 

29 

LAST 1450 

10,3561 

3 0100 0 

IIM 

REP 

1 


10.3562 

7 385 3 0 

1181 

RBP 415 

LAST 1450 

10,3563 

10 000 0 

1182 

RBP 

1 


10,3584 

1 3481 0 

1183 

RES' 

5 

last 1443 

10,3565 

3 1071 0 

1184 

RBP 

6 

last 1410 

10,3568 

7 4726 1 

1185 

REP 416 

last 1450 

10,3567 

10 000 0 

1186 

REP 

3 

last 1449 

10,3570 

1 3463 1 

1187 

mp 

3 

LAST 1446 

10,3571 

3 0 371 1 

1188 




10,3572 

0 0006 1 

1189 

RBP 

4 

last 1450 

10,3573 

1 3463 1 

1190 

REP 

4 

LAST 648 

10,3574 

3 4762 0 

1191 




10,3575 

0 0004 0 

1192 

RBP 

35 

LAST 1440 

10,3576 

0 5027 1 

1193 

RBP 

4 

last 1445 

0387 


1194 

RBP 

2 

LAST 1444 

10,3577 

0274 3 0 

1194 




10,3800 

20100 1 

1195 

RBP 

5 

last 1450 

10,3601 

1 3463 1 

1198 

REP 

30 

last 1450 

10,3802 

3 0100 0 

1197 

REP 

3 

LAST 1450 

10,3803 

7 3652 1 

1198 

REP 417 

LAST 1450 

10,3804 

10 000 0 

1199 

HEP 117 

LAST 1449 

10,3605 

1 5112 1 

11991 

REP 

3 

LAST 1439 

10,3606 

1 3102 0 

1200 

RBP 

3 

last 1448 

10,3807 

50 157 1 

1201 

RBP 

5 

LAST 1450 

10,3610 

3 0367 0 

1202 

REP 

14 

LAST 1445 

10,3811 

7 6043 1 

1203 




10,3812 

4 0000 0 

1204 

RBP 717 

LAST 1448 

10,3613 

6 0155 0 

1205 




10,3814 

0 0006 1 

1208 

US' 

1 


10,3615 

1 3437 0 

1207 

RBP 

6 

last 447 

10,3616 

1 3176 0 

1208 

REP 

52 

last 1449 

10,3817 

4 6214 1 

1209 

HEP 

3 

LAST 1448 

10,3620 

0 4170 0 

1210 

REP 118 

IAST 1450 

10,3621 

1 5112 1 


NOtWHBr 


CA 

M*aK 

OCs 

TCP 

CA 

MAac 

CCS 

TCP 

CA 

MAa< 

CCS 

TCP 


PLAQUBDa 

PRioao 

A 

NCReNCH 

PLAOmOA 

BITS5+11 

A 

MAHcwAkE 

PLAOwiOa 

BITS4+10 

A 

NOEWAAkB 


CA 

HAaC 
CCS 
TCP 
CA 
BjOBro 

BzP ENDHET 


EBANKTBA 

OC750 

A 

B®RET 

NVSAVE 


CAP PRIOlS 

lEHINT 

TC NOvAC 

EBANKr NVWORD 
2CADR PLAYJUMi 


TCP 

MARSLEEP CA 

mask 

CCS 

TCP 

TCP 


©TORET 

FLAOWHDa 

BITS5+11 

A 

ENDOPJOB 

GOSLfflPS 


CA NVWOBD 

MAac LOrr 

CCN 

AD MPAC ,-1 

EXTEMD 

BZP QCrOENT 

TCP PINBRNtCM 


eraser 


CS 

TC 

TCP 


THREE 

Nvaffl 

ENDOPJOB 


USBRaS PAGE NO. 31 Bo S4 

IS BIDIlELa SET 

IS NORMAL OR PRIO IN ©tDIDLE 


IS MARC SLEEPINO 
OR WAITING 


NO 

IS NORMAL INTERRUPTED OR WAITING 
YES 

NO, WAS IT A PLAai REGUEST 
OR A GCDSPHET 

YES 


IS marc ALREADY IN 

YES 




NCUNREG 

NO, THEN LOAD IS VALID 

YES, ACCEPT LOAD BUT ASK ECR lAST AGAIN 

blank Everyth ingexcept 



20*35 OCT. 28,1968 SATOAP .007 PAGE 1451 




ASsa«LE revision 249 OF AOC PROISWM CQUJSSU3 BY JWSA 2021111-041 


DISPLAY WIBBPACB ROUTINES 


1211 

RBF 

119 

LAST 1450 

10,3622 

1212 




10,3623 

1213 




10,3624 

1214 




10,3625 

1215 




10,3626 

1216 




10,3627 

1217 




10,3630 

1218 




10,3631 

1219 

REF 

T 

LAST 1450 

10,3176 

1220 




10,36 32 

1221 




10,36 33 

1222 




10,3634 

1223 

RBF 

1 


10,3635 

1224 

HEP 

4 

LAST 1444 

10,3636 

1225 

HH' 

3 

LAST 1450 

10,3637 

1226 




10,3640 

1227 




10,3641 

1228 




10,3642 

1229 

tep 

4 

LAST 358 

4160 

1230 




10,3643 

1231 

REF 

1 


10,2461 

1232 

REP 

1 


10,2501 

1233 

REF 

9 

LAST 891 

10,2465 

1234 

REF 

5 

LAST 891 

10,2504 

1235 

HEP 

4 

LAST 563 

5423 

1236 

REF 

14 

LAST 1186 

0165 

1238 




10,3644 

12385 




10,3645 

1239 




10,3646 

1240 




10,3647 

1241 




10,3650 

1242 




10,3651 

1243 

REP 

3 

LAST 1441 

1067 

1244 

RBF 

1 


1070 

1245 

REP 

6 

LAST 1450 

1071 

1246 




10,365 2 

1247 




10,3853 

1249 




10,3654 

1250 




10,3855 

1252 




10,3656 

1253 

REP 

T 

LAST 1393 

7707 

1254 

REP 

2 

LAST 1445 

10,3216 

A12S5 





1256 

REF 

T18 

LAST 1450 

0157 

1257 

REF 

T19 

LAST 1451 

0160 

1258 

REP 720 

LAST 1451 

0161 

1259 

RBP 

43 

LAST 1446 

0164 

1260 

9BF 

26 

LAST 1152 

0163 




! 

I 


00036 1 
00231 1 
01407 0 
14400 0 
00030 1 
01006 0 
00014 1 


20010 1 
40230 1 
40036 0 
20670 1 
20530 0 
20743 0 


03400 0 
11210 1 
66521 1 


00700 0 
00704 1 
40030 0 
34300 0 
40100 1 
00110 1 


02020 1 
01010 1 
00026 0 
77730 0 
00050 1 


TCP BTOOPJCB 


PBBPMASK 

V01N25 

V06N0T 

VSONOO 

PEHP2MSC 

V04N06 

PBHP4MaC 

OOAaiN 

REDCMAac 

MARK3MSK 

MARKAMSG 

NVCADH 

WAkBCADR 


OCT 

VN 

VN 

VN 

OCT 

VN 

OCT 

EQUALS 

OCT 

OCT 

OCT 

CADR 

CADR 

CADR 


0036 

00125 

00607 

5000 

00030 

00406 

14 

PINBI«»CH 

20010 

40230 

40036 

REDOPRIO 

MARCPLAY 

PLAYJUMl 


OCT3400 

NBUS4ASK 

1>M4ASK 

verrmask 

VOSNOOMI 

GOKDSP 

OCNDSPR 

GOkDSPP 

OCNDSPFR 

eNDexT 

MPAC2SAV 

nvbosmsk 

ASTRCMSK 

mpbrfmek 

OCT34300 

BITS15*7 

B1TS7+4 

DSPPLO 

MAftcPIAO 

SAVEFLAO 

BITS5<-11 

BIT34+10 

LOWLOAD 

BUSYMASK 

CADBMAEK 

PINMASK 

GOPIAY 

PRIOSAVE 

COPMPAC 

TBIPORa 

OUTHERE 

COP INDEX 

USERPRIO 


OCT 

equals 

equals 

equals 

equals 

equals 

equals 

OCT 

OCT 

OCT 

OCT 

OCT 

OCT 

EQUALS 

EQUALS 

EQUALS 

OCT 

OCT 

DEC 

OCT 

OCT 

EQUALS 

EQUALS 

EQUAl.S 

equals 

EQUALS 

EQUAl.S 

EajALS 

EQUALS 


3400 

11210 

66521 

MID7 

1177 

GCMARK 

GCMABKR 

GCMAHKE 

GCMAEkFR 

ESDMAHk 

BANKSET 

TOO 

704 

40030 

34300 

40100 

110 

EBANKSAV 

MAHGEBAN 

HMNlcreM 

2020 

1010 

22 

77730 

50 

13,14,15 
NVDSP 
RlSAVE 
MPAC +3 
MPAC +4 
MPAC +5 
LOC 
MODE 


USiteS PAGE NO. 32 Bo S4 . 


PLAai,PEHPOEW,BLANK R2 AND H3 
GIOPERP3 VN DISPLAY BEFORE V50 


PLAai, PERFORM 
FLAai, BLANK B3 


bits 4 AND i4 

marc, DECIMAL NOUN, PERPCSM, PLASH 
marc, PERFORM, FLASH, blank 2 AND 3 


ebank mask 


(OCT 37600) 
VOS MINUS CNE 


BIT 15,5,4. for marc, perform, FIASH 


* DCNT MOVE 

* DCNT MOVE 


\ 

I 


Ill 


ASSE^BLE RBVISIOI 249 OP AOC PROGRAM COLOSSUS BY NASA 2021111-041 
DISPLAY INTERPACB ROUTINES 



20’35 OCT. 28,1968 SATRAP .OOT PAGE 1452 
USERaS PAGE NO.' 33 Eo S4 


1261 

US' 721 

LAST 

1451 

0162 



aa*4Aa< 

EOUALS 

MPAC +6 


1262 




10,3657 

20144 

1 

PRIOOCT 

OCT 

20144 

PRIO 

1263 




10,3660 

42424 

0 

markoct 

OCT 

42424 

mac 

1264 




10,3661 

11254 

1 


OCT 

11254 

NORM 

1265 




10,3662 

74704 

1 

IDLESLEP 

OCT 

74704 


1266 




10,3663 

67777 

1 

OCT87777 

OCT 

67777 


126T 

REP 18 

LAST 

891 

5415 



LINUS 

EQUALS 

blanket 


1268 

REP 722 

LAST 

1452 

0154 



PACBRBO 

EQUALS 

MPAC 


1269 

REP 723 

LAST 

1452 

0155 



PLAYTEMl 

equals 

MPAC 


1270 

REP 724 

LAST 

1452 

0157 



PLAYTtMs 

EQUALS 

MPAC 4.3 


1271 

REP 725 

LAST 

1452 

0160 



PLAYKMA 

EQUALS 

MPAC 4.4 


1273 




10,3664 

40420 

0 

OCT40420 

OCT 

40420 


1274 

REP 3 

LAST 

1440 

10,3665 

02674 

0 

M4KEGB4 

GENADR 

makbplay 


1275 




10,3666 

10200 

1 

CCT102OO 

OCT 

10200 


1276 




10,3667 

30200 

0 

V97NOO 

VN 

09700 

PASTE 

12761 




10,3670 

20100 

1 

OCT20100 

OCT 

20100 



PASTE ppR V97 OR V99 





20 ’35 OCT. 28,1968 SATRAP .OOT PAOB 1453 



A3SE^eLB REVISION 249 OF AOC PROORAM COUJSSUS BY NASA 2021111-041 


L SBRVICB ROirriNES 


0037 





7717 



BLOQC 

3 

0038 

HEP 

1 



8000 



setux: PETAOe 

0039 





7717 



bank 


0040 

REP 

1 






COUNT 

03/PLAO 

0043 

REF 

233 

LAST 

1446 

7717 

54 001 

1 UPeMT2 

TS 

L 

0044 

REP 

4 

LAST 1382 

7720 

7 4716 

1 

mask 

OCT7 

0045 

HEP 

234 

LAST 

1453 

7721 

56 001 

0 

XCM 

L, 

0046 

HEP 

3 

LAST 1364 

7722 

7 5630 

0 

mask 

OCTITTTO 

0047 





7723 

0 0004 

0 

INHINT 


0048 

REP 

30 

LAST 

1404 

7724 

54 061 

1 

TS 

ITH4P1 

0049 

HEP 

235 

LAST 

1453 

7725 

50 001 

0 

NDX 

L 

0050 

REP 

12 

LAST 

993 

7726 

4 0074 

0 

CS 

FLAaniDo 

0051 

REF 

31 

LAST 

1453 

7727 

7 0061 

1 

WSK 

ITHMPl 

0052 

REF 

236 

LAST 

1453 

7730 

50 001 

0 

NDX 

L 

0053 

HEP 

13 

LAST 

1453 

7731 

26 074 

0 

ADS 

PLAGOTDo 

0054 





7732 

0 0003 

1 

HBLINT 


0055 

REP 

340 

LAST 

1449 

7733 

24 002 

0 

INCH 

0 

0056 

REF 

341 

LAST 

1453 

7734 

0 0002 

0 

TC 

0 


0059 RBF 23T LAST 1453 

0060 REP 5 last 1453 

0061 REP 238 LAST 1453 


0062 REP 4 LAST 1453 

0063 



0064 

0065 

0066 
006T 
0068 
0069 


REP 239 LAST 1453 
HEP 14 LAST 1453 
REE 240 LAST 1453 
HEP IS LAST 1453 


OOTO REP 342 LAST 1453 

OOTl REP 343 LAST 1453 

0072 REP 24 LAST 1444 

0073 



7735 

54 001 

1 

DCWNENT2 TS 

L 

7736 

7 4716 

1 


MASK 

OCT7 

7737 

56 001 

0 


XCH 

L 

7740 

7 5630 

0 


MAac 

CCTr7770 

7741 

4 0000 

0 


COM 


7742 

0 0004 

0 


INHINT 


7743 

50 001 

0 


NDX 

L 

7744 

7 0074 

0 


SWSK 

FiAomyo 

7745 

50 001 

0 


NDX 

L 

7746 

54 074 

0 


TS 

FLACmOo 

7747 

0 0003 

1 


RELINT 


7750 

24 002 

0 


INCH 

0 

7751 

0 0002 

0 


TC 

Q 

4716 



OCTl 

eojals 

SEVEN 

,3671 




bank 

10 


USBR«S PAOB NO. 1 EO 34 


•HIGH PLAGWOHD IS IT 
SAVE IN L POB INDEXING 

obtain the bit information 

PHEVBIT INTEHUPTS 

STORE THE bit INFORMATION TEMPORARIALY 


RELEASE INTERUPT INHIBIT 

OBTAIN THE C01RREC?r RETURN ADDRESS 
HETUKI 

•HICH PIAQWORD IS IT 

SAVE IN L FOR INDEXING 

OBTAIN THE BIT INPORMTICN 
SIART TO -PROCESS THE INPORHATICN 

PREVENT INTERUPTS 

release INTERUPT INHIBIT 

OBTAIN THE CORRECT RETimN ADDRESS 
RETURN 


Ill 



ASSe«LB RBVISICN 249 OP AOC PROQRAM COLOSSUS Bt VASA 2021111-041 

888^108 routines 


20*35 OCT. 28,1968 SATRAP .OOT PAOB 1454 
USBRaS PAGE NO. 2 - Bo S4 


POOT4 

ROOTS 

ROOTT 

ROOTS 

R0081 

R00S2 

R0084 

R008S 

R008S 

ROOST 

R0088 

R0090 


UPPLAG AND IXMNFLAO ABE B4TIBBLY OBNEBAL PIAO SETTINO AND CLEAHINQ SUBROUTINES. USING THBI, RHBTHEH OR 
NOT IN INTERBUPT, ONE mY SET OR CLEAR ANY SINGLE, NAj«D BIT IN ANY ERASABLE REGISTER, SlBJECT OP COURSE TO 
EHAf«C setting. A BNAi'eDa BIT, As THE WORD IS USED HERB, IS ANY BIT WITH A NA^B FOEMALLY ASSUMED BY THE YUL 
A33E«IER. 

At present the only NABBD bits ABE those in the PIAOnOBDS. ASSE^eLEH CHANGES WILL B«kE IT POSSIBLE TO 
NA* ANY bit in ERASABLE (®40RY. 

calling ffioaiCEs abb As pollcws*- 


TC UPPLAO 

acres wnb op flag 


IC DOWNPLAO 
ADRBS NA.>4E op flag 


SElUel IS TO THE LOCATICW FOLLOWING THE s4DRES« ABOUT .58 MS AFIER THE «TC/j. 
UPW BBTIBW a CONTAINS THE CURRENT PLAGWED SETTINO. 


9091 





5435 




BLOCK 

02 


0092 

RES' 

5 

LAST 

1381 

4000 




ffiTLOC 

FPTAOi 


0093 





5435 




bank 



0094 

BBP 

1 







CGlKW' 



0095 

REP 

344 

LAST 

1453 

5435 

3 0002 

0 

UPFLAG 

CA 

o 


9096 

HEP 

1 



5436 

0 5453 

0 


TC 

DEBIT 


e09T 





5437 

4 0000 

0 


CCM 


♦ (15 - BIT) 

0098 





5440 

0 0006 

1 


EXTEND 



0099 

RES' 

16 

LAST 

1101 

5441 

04 001 

1 


BOR 

lcham 

®T bit 

0100 

RES' 

32 

LAST 

1453 

5442 

50 061 

0 

CCMPLAG 

INDEX 

ITHMPI 


0101 

REP 

16 

LAST 

1453 

5443 

54 074 

0 


TS 

FLAOWRDO 


0102 

RES' 

5 

LAST 

13T9 

5444 

22 063 

1 


LXCH 

iiffiMpa 


0103 





5445 

0 0003 

1 


RELINT 



0104 

REP 

241 

LAST 

1453 

5446 

0 0001 

0 


TC 

L 


0105 

HEP 

345 

LAST 

1454 

5447 

3 0002 

0 

DCMNPLAG 

CA 

0 


0106 

REP 

2 

LAST 

1454 

5450 

0 5453 

0 


1C 

DEBIT 


OlOT 

REP 

242 

LAST 

1454 

5451 

7 0001 

1 


mac 

L 

RESET bit 

0108 

HEP 

1 



5452 

1 5442 

1 


TCP 

CCMPLAG 


0109 

RES' 

1T4 

LAST 

1449 

5453 

8 4712 

1 

DEBIT 

AD 

(KE 

GET DE bits 

0110 





5454 

0 0004 

0 


INHINT 



0111 

REP 

< 

LAST 

1454 

5455 

54 063 

0 


T3 

I'ffiMPS 


0112 

RES' 

4 

LAST 

116T 

5456 

3 4721 

1 


CA 

LOtir4 

D0Ci5 

0113 

REP 

33 

LAST 

1454 

5457 

54 061 

1 


TS 

iTtMPi 


0114 

RES' 

T 

LAST 

1454 

5460 

50 063 

1 


INDEX 

n?MP3 


0115 





5461 

2«7777 

0 


CA 

0 -1 

ADRBS 

0116 

HEP 

243 

LAST 

1454 

5462 

54 001 

1 


TS 

L 


OUT 

REP 

283 

LAST 

1449 

5463 

3 4714 

1 


CA 

ZERO 







u 


AsseetB levisioN 249 o' a® proqram colossus by masa 2021111-041 
SBEtyriCB HOUriNES 


0118 

0119 

0120 
0121 
0122 

0123 

0124 

0125 

0126 


HH' 34 
BH' 35 
VBF 36 
BH' IT 
BEP 244 
BEB 22 
BEP 56 
BEP 346 


LAST 1454 
LAST 1455 
LAST 1455 
lAST 1454 
lAST 1454 
LAST 1403 
LAST 1434 
LAST 1454 


5464 

5465 

5466 
546T 
54T0 
5471 
54T2 

5473 

5474 


0 0006 
10 061 
52 062 
50 061 

3 0074 
54 001 
50 062 

4 4674 
0 0002 


EXTEND 

IV n»1Pl 
DXCH IiaiPl 
INDEX ITSMPl 


CA 

T3 


FLAOWIOO 

L 


INDEX ITEMP2 
CS BIT15 

TC 0 


20*35 OCT. 28.1966 8ATBAP .007 PAOB 1455 
USSbiS PACB NO. 3 Bo S4 

A = PIAOKID, L = (15 - BIT) 

CURBENT SWTS 
-(15 - BIT) 




HI 


Pom 

*0129 

*0130 

*0131 

*0132 



*SSB«LB BBVISION 249 OP AGO PBOWW COUJSSUS BY NASA 2021111-041 
SBRYICB RCXiriNBS 

DELAYJOB- A (BKBBAL ROTTINE TO DBLAY A JOB A SPBCIPIC AMOUNT OP TI* 

hhhancb RBC3uiRa«m... 


CAP 

TC 

CAOR 


DT 

BAJOCCAIX. 

DBLAYJOB 


0133 

0134 
0133 

■0130 

HEP 1 

THIS HIST RB4AIN IN 

00,3651 

00,2000 

00,3732 

bank 0 *• 


bank 00 

»TLOC DLAYJOB 

bank 

0137 

HEP 

1 




• • T T f T ^ f f f f 

COUNT OO/DBIAY 

0138 




00,3732 

0 0004 0 

DELAYJOB INHINT 

0139 

HEP 

347 

LAST 1455 

00,3733 

54 002 1 

TS 

0 

0140 

HEP 

1 


00,3734 

3 6214 0 

CAP 

DELAYNUM 

0141 

REP 

37 

last 1405 

00,3735 

54 070 1 

DBLLOOP TS 

RIPTHEGi 

0142 

REP 410 

last 1450 

00,3736 

50 000 1 

INDEX A 

0143 

REF 

5 

LAST 188 

00,3737 

3 1141 1 

CA 

DEIAYLOC 

0144 




00,3740 

0 0006 1 

BxT©a> ■ 

0145 

REP 

1 


00,3741 

1 3746 0 

BZP 

QC2DEIAY 

0140 

REP 

38 

last 1456 

00,3742 

10 070 1 

CCS 

RlPlHEOi 

0147 ' 

REP 

1 


00,3743 

1 3735 1 

TCP 

DELLOOP 

0148 

REF 

7 

LAST 1199 

00,3744 

0 5604 0 

TC 

bailout 

0149 




00,3745 

01104 0 

OCT 

1104 

0130 

REF 

1 


00,3746 

3 3766 0 

CK2DeLAY CA 

TOSl^P 

0151 

REP 

5 

LAST 1193 

00,3747 

54 061 1 

TS 

waiiexit 

0152 

REP 

30 

last 1180 

00,3750 

3 0004 0 

CA 

prank 

0153 

REF 

39 

last 1456 

00,3751 

6 0070 0 

AD 

BUPTOEOl - 

0154 

REP 245 

last 1455 

00,3752 

54 001 1 

TS 

L 

0155 

REP 

1 


00,3753 

3 3767 1 

CAP 

WAkECAD 

0156 

REP 

2 

last 1193 

00,3754 

1 5148 0 

TOP 

DLY2 -1 

0157 

REP 

T 

last 1441 

00,3755 

0 4604 1 

■TOGETOAD TO 

MAkECADR 

0158 

REP 

40 

LAST 1458 

00,3756 

50 070 0 

INDEX 

ajPTRBGi 

0159 

REP 

fi 

LAST 1456 

00,3757 

55«141 0 

TS 

DELAYLOC 

0100 

REP 

8 

last 1442 

00,3760 

0 5070 0 

TO 

JOBSI-EEP 

0161 

RBP 284 

last 1454 

00,3761 

3 4714 1 

WAkER cap 

zero 

0102 

RBP 

36 

last 1440 

00,3782 

50 008 1 

INDEX 

BaA!>X 

0103 

REP 

T 

last 1456 

00,3763 

57«14l 1 

XCH 

DEIAYLOC 


20’35 OCT. 28,1968 SATRAP .007 PAOB 1456 
USBRbS PAOS no. 4 Bo S4 
beforb picking up again. 

DBLAY JOB PGR DT CBfTISECS 


STOHB DELAY DT IN O FOR DLY -1 IN 

waitlist 

IS THIS DGXAYLOC AVAILABLE 
YES 

NO, THY NEXT DEIAYLOC 
NO AVAILABI£ LOGS AVAILABIP. 

SET WAITLIST IM'EDIATB RETURN 

STORE BHANK for TASK CALL 

STORE CADR FOR TASK CALL 
DLY IS IN WAIH,IST routine 

GET CALLERS FCADR 

SAVE DEIAY CADRS 


make DBlAYlxr AVAHAHIE 




20*35 OCT. 28,1988 SATRAP .OOT PAGE 145T 




L 

0184 

0185 

0188 

018T 



ASSaeif BB^SION 249 

sesmcB Kxn'iNEs 

HBP 13 lAsr 1443 

BEE T3 lAST 140T 

BEE 1 
BEE 1 


CE AOC PBOOBAM COLOSSUS BY f«SA 2021111-041 


00,3784 

0 S0T4 1 

tc 


00,3785 

0 S213 1 

ic 

TASKOVER 


00,3788 03753 0 ICSLEEP GEMAOR TOOBTCAD -2 
00,3787 03781 1 BAKBCAD CBtADR WAkBR 


USSiWS PAOB KO. 5 BO S4 






ASSBBtB REVISION 249 CP AOC PHOOEIAM COUISSUS Bt NASA 2021111-041 

L service routines 

meg cbhran, a bux^c transfer routine. 


niTo 

MlTl 


WRITIBI by D. BYLES 
■MOD 1 BY KERNAN 


20’35 OCT. 2B,196B SATRAP .OOT PAOB 1458 
U»US PAOB NO. e Bo 84 

UTILIIYM REV IT ll/lB/67 


M1T22 MOD 2 BY SOlULaJBEHO (BB4CVE RELINT) aCIPPBR REV 4 2/28/88 


■01T3 THIS ROUTINE IS USEFULL FOR THANSPERINO N CCNSECUTIVB ERASABLE OB FIX® QUANTITIES TO SO« OIHEB N 

■01T5 OONSEIXJTIVE ERASABLE LOCATIONS. IF BOTH BLOCKS OP DAW ABB IN SWIICHABLE EBANKS, THEY HIST BE IN THE SAFE ONE. 


ROITT 



CBTTRAN IS CALLABLE 

IN A JOB As DELL AS A RJPT 

'. THE CALLING SEOUB^CB IS* 

A01T9 






I 

CA 

N-1 

/ OP QUANTITIES MINUS CNE. 

AOISO 






I ♦! 

tc 

OeiTRAN 

IN PIXED-FIXHD. 

AOISI 






I *2 

AORES 

L 

STARTING ADRBS CP DATA TO BE MOVED. 

A01B2 






1 *3 

acres 

M 

STARTING ADHES OP DOPLICATICN BLOCK 

A0183 






I *4 



BBTUIWS HEBE. 

■0184 



cenRAN takes 

25 MC7V.S ( 300 MICROSECONDS) PER 

ITEM + 5 MCTWS 

(60 MICS) FOB BITEHINO AND EXITING. 

■0188 



A, L AND ITBNPl ARE NOT PRBSBIWED. 




ei8T 




S4T5 



block 

02 


ei88 

REF 

2 

LAST 1433 

4000 



SBTIXE PFTAa4 


•189 




5475 



bank 



•190 

REP 

■ 3T 

last 1455 

0061 



EBANK= 

ITBIPl 


•191 

REF 

1 





C0114T4 ts/TOAN 


•192 




5475 

0 0004 

0 GENTRAH 

INHINT 



•193 

REF 

38 

WST 1458 

5476 

54 061 

1 

T3 

ITEMPl 

SAVE N-1. 

0194 

REF 

348 

IAST 1456 

5477 

SO 002 

0 

INDEX 

0 

C(0) = ADRBS L. 

•19S 




5500 

8 0000 

1 

AD 

0 

ADRBS (L + N - 1) . 

•198 

REF 

419 

LAST 1456 

5501 

50 000 

1 

INDEX 

A 


• 19T 




5502 

3 0000 

1 

CA 

0 

C(ABCVE). 

• 198 

REP 

246 

LAST 1456 

5503 

54 001 

1 

T3 

L 

SAVE DATA. 

0199 

REP 

39 

LAST 1458 

5504 

3 0061 

0 

CA 

ITPMPi 


•200 

REF 

349 

LAST 1458 

5505 

SO 002 

0 

INDEX 

0 


0201 




5506 

6 0001 

0 

AD 

1 

ADBES (M + N - 1) . 

0202 

REF 420 

last 1458 

5507 

SO 000 

1 

INDEX 

A 


0203 




5510 

22 000 

1 

LXCM 

0 

STUFF IT. 

0204 

RBP 

40 

last 1458 

5511 

10 061 

1 

CCS 

IlEMPl 

LOOP UNTIL N-1 = 0. 

•20S 

HEP 

13 

LAST 785 

5512 

1 5476 

0 

ICF 

GBITRAN 


•20T 

BET 

4 

LAST 1372 

5513 

1 6710 

0 

TCP 

0^2 

RETUroi TO CAILER. 


m 




lU 

1 / 

P0208 

M209 

0211 


AssBflLB HBVISIQK 249 OP AOC PBOOBAM COLOSSUS Kf NASA 2021111-041 

fftnnCB routines 

B 5 QPP ®RO bit 5 OP EXTVBACr, RHIQI IS SET BT TBSTXACT. 

MAY BE USaJ AS NEEDED BY ANY ESCIENDED VERB ««ICH HAS DCWE TESTXACT 

COUNT* t*/aavB 

. BBP 1 


20*35 OCT. 28.1900 SATRAP .OOT PAGE 1459 
USESM PACE NO. T Bo S4 


8212 BBP 49 LAST 1446 

6213 "O' *1 1*33 

0214 REP 22 last 1459 

6215 BEE 126 tAST 1451 


5514 4 4T0fl 0 BsQPP 

5515 T 1044 1 
5518 55«044 1 
551T 0 5112 0 


CS 

HASC 

TS 

TC 


bits 

EXTVBACr 

BXTVBACT 

EMOOPJCB 



Ill 




ASSBBLB BBVISICN 249 OP AOC PBOGBAM COLOSSUS BY HAS* 2021111-041 
8SRYIC8 ROUTINES 


P0216 subroutines TO TURN OPP AND TURN CN TRACKER PAIL LiatT 

021T 

0218 RBP 

0219 RBP 

0220 RBP 

0221 RBP 
02215 REP 
02218 RBP 
8221T REP 

0222 
0223 


0224 

0225 
0228 
022T 
0228 


REP 

REP 

REP 

REP 





5520 

0 0004 

0 

thpailop uhint 


1 

lAST 


5521 

4 7704 

1 

C3 

OCT40200 

48 

1396 

5522 

7 1036 

1 

MAac 

DSPTAB +110 

57 

LAST 

1455 

5523 

6 4674 

0 

AD 

BIT15 

47 

LAST 

1460 

5524 

5S«036 

1 

T3 

DSPTAB tiiD 

. 37 

LAST 

381 

5525 

4 1331 

0 

CS 

OPTMODES 

55 

UST 

1378 

5526 

7 4704 

1 

MAac 

Birr 

38 

LAST 

1460 

5527 

27«331 

0 

AOS 

apIMODES 




5530 

0 0003 

1 

REO RBLINT 


350 

LAST 

1458 

5531 

0 0002 

0 

IC 

o 




5532 

0 0004 

0 

THPAILCN INHINT 


48 

UST 

1460 

5533 

4 1036 

1 

CS 

DSPWB tiiD 

2 

LAST 

1460 

5534 

7 7704 

1 

MAac 

OCT40200 

49 

LAST 

1460 

5535 

27«038 

1 

AOS 

DSPWB *110 

1 



5538 

1 5530 

0 

TCP 

leo 


20’35 OCT. 28,1968 SATRAP .OOT PACE 1480 
USSRaS PACE NO. 8 Bo S 4 

TUIW GPP tracker light 


TO INSURE THAT OCDU PAIL WILL 00 ON 
ACM IN IP IT WAS CN IN ADOITICN TO 
THACKER PAIL. 


lUIH CN 



20*35 CCT. 28,1968 SATRAP .001 PAOB 1461 




Hi 


ASSEI«LB REVISICW 249 OP AOC PBOtSAM COLOSSUS BY NASA 2021111-041 

alarm and abort 


uasius PAOB NO. 1 


BO S4 


nool 

moos 


THE POLUWINO Sl«KWrINR MAY BE CALLED TO DISPLAY A NON-ABORTIVE ALARM CCNDITIW. IT MAY BE CALLHJ 
BinffiR IN INTERRUPT OB UNDER EXECUTIVE CCNTROL. 


moo4 


CALLING SBOUESICB IS AS FOLLOWS’ 


ROOOS 

moo6 

mooT 


ic 

OCT 


ALARM 

AAANN 


ALARM MO. NN IN GENERAL AREA AAA. 
IRETURLS HERE) 


0008 

0009 

0010 


0011 

0012 

moi3 

0014 


REP 

REF 


55 3T 
4000 
55 3T 


8 LAST 382 
1 


03T5 


0015 

REF 

351 

LAST 1460 

5540 

0016 

REF 

A 

LAST 1364 

5541 

OOIT 

HEP 

352 

LAST 1461 

5542 

0018 




5543 

0019 

HEP 

24T 

LAST 1458 

5544 

0020 

HEP 

37 

LAST 1456 

5545 

00202 




5546 

00204 

REP 

26 

LAST 1440 

554T 

0021 

HEP 

5 

LAST 1461 

5550 

0022 

REP 

353 

LAST 1461 

5551 

0023 

REP 

41 

LAST 1458 

5552 

0024 

REP 

9 

LAST 1461 

5553 

0025 

HEP 

1 


5554 

0026 

RET 

10 

LAST 1461 

5555 

002T 

REP 

1 


5556 

0028 

REP 

11 

LAST 1461 

555T 

0029 

REP 

1 


5560 

0030 

REP 

12 

LAST 1461 

5561 

0031 

REP 

1 


5562 

0032 

REP 

13 

LAST 1461 

5563 

0033 

REP 

37 

LAST 1201 

5564 

0034 

REF 

421 

LAST 1458 

5565 

0035 

REP 

1 


5566 

0038 

HEP 

14 

LAST 1461 

556T 


1 55T1 0 


1 5563 0 


1 5600 0 


block 

02 

SETLOC 

pptaot 

bank 

EBANK:: 

FAILREO 

COUNT 

02/ALAIM 

BUT DOES NOT DISPLAY. 

ALARM INHINT 

CA 

0 

ALAFM2 TS 

AliCAEW 

INDEX 

0 

CA 

0 

BOBIENT TS 

L 

PRICENT CA 

BBANK 

♦1 Exi®ro 

ROR 

superbnk 

TS 

ALMCADR +1 

LAH^®^T CA 

0 

TS 

ITEMPl 

CrtCPAILl CCS 

FAILfflO 

TCP 

CHCPAIL2 

LXCH 

FAILREO 

TCF 

PBOGLARM 

ClHFAILz CCS 

FAILREO +1 

TCP 

FAILS 

LXOf 

FAILREO +1 

TCP 

HILTEXIT 

FAIL3 CA 

FAILREO +2 

MASK 

POS4AX 

CCS 

A 

TCP 

MX-TPA IL 

LXW 

FAILREO *2 


ADO SUPER bits. 

STORE RETURN FOR ALAIW 


IS ANinHING IN PAILRBG 
YES TRY NEXT REG 


TURN ALARM LIGHT CH FOR FIRST AlAIW 



Asaaeu! gevisiw 349 op aoc prooram colossus by has* 2021111-041 


20’35 OCT. 28,1968 SATHAP .OOT PAGE 1462 


III 

L AMIM AW ABORT USEB-S PACE NO. 2 Eo S4 


003T 

OB' 

2 

lASr 1461 

5570 

1 5574 0 

TCP 

HJLTEXIT 


0038 

Bap 

50 

LAST 1460 

5571 

4 1036 1 

PROOLAIW Cs 

DSPTAB *110 


0039 

REP 

2 

lAST 1437 

5572 

7 5612 0 

MAaC 

OCT40400 


0040 

BBP 

51 

lAST 1462 

5573 

27«036 1 

AOS 

DSPTAB tiiD 


0041 

BBP 

42 

I>ST 1461 

5574 

56 061 0 

MJLIEXIT XCH 

n®ipi 

OBTAIN RETUIW ADDRESS IN A ' 

0042 




5575 

0 0003 1 

RELINT 


0043 

BBP 

422 

LAST 1461 

5576 

50 000 1 

INDEX 

A 


0044 




5577 

0 0001 0 

TC 

1 


0045 

BEE 

248 

LAST 1461 

5600 

3 0001 0 

MULTPAIL CA 

L 


0040 

BBP 

50 

LAST 1460 

5601 

6 4674 0 

AO 

bitis 


004T . 

BBP 

15 

LAST 1461 

5602 

54 377 0 

TS 

RAILRBQ *2 


0048 

BBP 

3 

IAST,1462 

5603 

1 5574 0 

TCP 

WLTEXIT 


110049 

PRIOLABM DISPLAYS V05N09 VIA 

PRIODSPR WITH 3 RBIUIWS TO THE USER FRCM 

THE ASTRCNAUT AT CALL LOC ♦l,+2,+3 AND 

ROOSl 

AN DoeoiAis BBmre^ 

TO THE USER AT CALL LOG *4. EXAMPLE FOLLOWS. 


AOOS2 






CAP 

octxx 

ALARA CCDE 

A0053 






TC 

BAfflcCALL 


A0054 






CAOR 

PRIOLAIM 


A005S 









A0056 









A0057 






• • • 

... 

ASTRCNAUT RETURN 

aoosb 






TC 

PHASCHNO 

IM«>IATE RETURN TO USER. RESTART 

Ao059 






OCT 

X.l 

PHASE QIANGB FOR PRIO DISPLAY 

0060 




10,3671 


BA»c 

10 


0081 

ftps' 

2 

LAST 1433 

10,2000 


SETLOC DISPLAYS 


0062 




10,3871 


BAJOC 



0063 

REP 

2 last 1433 TO 

1453’ 

650 650* 

CCUJT 

10/DSPLA 


0064 




10,3671 

0 0004 0 

PRIOLAHM INHINT 


♦ * * keep IN DISPLAY ROUTINES BANK 

0065 

BBP 

249 

LAST 1462 

10,3872 

54 001 1 

TS 

L 

SAVE alarm code 

0060 

BBP 

24 

LAST 1410 

10,3673 

3 0133 0 

CA 

0UP2 

2 CADR OP PRIOLAiW USER 

006T 

BBP 

6 

last 1461 

10,3674 

55«383 1 

TS 

ALMCADR 


0068 

BEP 

25 

LAST 1462 

10,3875 

3 0134 1 

CA 

BUP2 +1 


0069 

BBP 

1 


10,3676 

0 5546 0 

TC 

PRIOB4T *1 

♦ LEAVE L ALCNE 

OOTl 




10,3677 

77467 1 

-2S0C DEC 

-200 

*+* DCNT MOVE 

OOT2 

BBP 

5 

LAST 759 

10,3700 

3 4743 0 

CAP 

V05N09 


00T3 

BBP 

1 


10,3701 

1 2632 0 

TCP 

PRICDSPR 


0074 




5604 


block 

02 


0075 

REP 

2 

LAST 1481 

4000 


SETLOC PFTAG7 


0076 




5604 


BA«c 











Ill 
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007T 

OOTS 

00T9 

0080 

0081 

0082 

0083 

0084 

00845 

0085 

00851 

00852 

00853 

00854 

00855 
008552 
008553 
008554 
008555 
008558 
00855T 
008558 
00858 
008561 
008562 
00656 3 

0085T 

00858 

00859 

0086 
0087 

0089 

0090 

0091 

0092 

0094 

0095 

0096 . 

0099 

ROlOO 

AOIOI 

A0102 


RBP 

2 ' 

lAST 1481 TO 

1462’ 

37 37* 




5604 

0 0004 0 

REP 

354 

LAST 1461 

5605 

3 0002 0 

REP 

7 

LAST 1462 

5606 

55«363 1 

REP 

355 

LAST 1463 

5607 

50 002 0 




5610 

3 0000 1 

REP 

I 


5611 

0 5544 1 




5612 

40400 1 




5613 

0 0004 0 

REP 

78 

LAST 1447 

5614 

3 4711 1 

REP 

17 

LAST 1372 

5615 

6 0005 1 

REP 

1 


5616 

54 017 0 




5617 

5 0017 1 

REP 

64 

LAST 1433 

5620 

0 4574 0 

REP 

3 

LAST 254 

5621 

12641 1 




5622 

0 0004 0 

REP 

356 

LAST 1463 

5623 

3 0002 0 

REP 

8 

LAST 1463 

5624 

55«363 1 

REP 

357 

LAST 1463 

5625 

50 002 0 




5626 

3 0000 1 

REP 

2 

LAST 1463 

5627 

0 5544 1 




5630 

77770 1 

REP 

1 


5631 

3 4705 1 

REP 

24 

LAST 1418 

5632 

7 0103 1 

REP 423 

LAST 1462 

5633 

10 000 0 

REP 

1 


5634 

0 5613 0 

REP 

248 

LAST 1414 

5635 

0 4555 0 

REP 

2 

LAST 180 

5636 

12474 0 

REP 

2 

LAST 1463 

5637 

0 5614 1 




5640 

0 0004 0 

REP 

358 

LAST 1463 

5641 

3 0002 0 

REP 

1 


5642 

0 5624 1 




5643 

01103 1 




5644 

0 0004 0 

RBP 

359 

LAST 1463 

5645 

3 0002 0 

RBP 

2 

lAST 1384 

5646 

0 5541 1 




5847 

00217 0 

REP 

9 

LAST 1463 

5650 

0 1363 0 


RBP 121 LAST 1459 5112 

CALLING SBC30ENCE FOR VABALABM 


BAILOUT 


COUNT 02/ALABM 

imiNT 
CA Q 

TS AIMCADR 


INCBX 

CAP 



tc 

BOR15NT 

OCT40400 OCT 

IMIINT 

40400 

•HIMPER 

CA 

T»0 


AD 

Z 


TS 

HBSU« 

BHUPT 


1C 

POSTJUMP 


CM>R 

B4B4A 

POCDOO 

INHINT 



CA 

O 

ABORT2 

TS 

ALMCADR 


INDEX 

0 


CAP 

0 


1C 

BOBi»rT 

OCT77770 

OCT 

77770 


CA 

V37ELBIT 


MAaC 

PLAOn»7 


CCS 

A 


1C 

RHIMPER -1 


1C 

BANKCALL 


CADR 

m.KI^AN 


1C 

whimper 

CCSHCLB 

INHINT 



CA 

0 


1C 

ABORT2 

OCT1103 

OCT 

1103 

CURTAINS 

INHINT 



CA 

0 


1C 

AIAIW2 

OCT217 

OCT 

0021T 


1C 

ALMCADR 

DOHA PM 

EOUALS BTOOPJCB 


CAP 

CALAPM) 


IC 

VARAIAIW 


20’35 OCT. 28.1968 SATRAP .007 PAGE 1463 
USSRaiS PACB NO. 3 BO S4 


HBSLWE ®ros CCNTROL HERB 


DCNT MOVE 
IS AVERAGE G CN 


YES. DCNT DO POCDOO. DO BAIIXUT. 


RBTUroi TO USER 



ID 


Assa>BLB BBVISICW 249 OP AQC PROQRAM COLOSSUS BY KAsA 202H11-041 
alarm AM) ABORT 


R0103 

VARALARM turns (W PROSMM alarm light but DOES 

NOT DISPLAY 

0104 




5651 

0 0004 

0 

VARALARM TNHINT 


0105 

REP 

250 

last 1462 

5652 

54 001 

1 


TS 

L 

0108 

REP 

360 

LAST 1463 

5653 

3 0002 

0 


CA 

0 

OlOT 

REP 

10 

LAST 1463 

5654 

55«383 

1 


TS 

ALMCADR 

0108 

REP 

2 

last 1462 

5655 

0 5545 

0 


IC 

PRICBVT 

0109 




5656 

00014 

1 

0CT14 

o(?r 

14 

0110 

REP 

11 

LAST 1464 

565T 

0 1363 

0 


tc 

ALMCADR 

0111 

REP 

8 

LAST 1456 

5604 



ABCRT 

BOlALS 

bailout 




20’35 OCT. 28,1968 SATRAP .OOT PAGE 1464 
U^US PAOB NO. 4 Bo 34 

SAVE users ALAIM CQDB 
SAVE USERS O 

DOIT MOVE 
return to user 

*** TBIPORARY until ABORT CALLS CUT 
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L UFQA 1 B FfUCRAM 

ROOOl PBOGBAM HA** 

110002 oRinBi by* 

B0003 •«» *>’ 

110004 HOD BY* 

mioos datb* 


UffiR.S PAOB NO. 1 BO 84 


P27 

kilboy/ db wolp 

e 

KILBOY 

oioeceT 


\ II0019 
R0020 
R0022 
80023 
R002S 
R002T 
R0029 
80031 


VOB »CnOH* UPDAlB PROOBAM. 


PUNCT DBSCR* P2T (WB UPDATE PROGRAM) PROCEsas COWlOS AM) DATA 
INSBRTICNS REOUBSTH) by tub (SKUO) via uplink, 
the P27 PROtWAM WILL ACCEPT UPDATES 
ONLY DURING PoO POR THE CM, AND WLY lUtlNO POO, 

P02, and PHSai START FOR THE C»I 

CALLING »0’ PROGRAM IS INITIATED BY UPLINK ENTHY OP VERBS TO, 71, 72 AND 73. 

SUOKUTDes’ TESTKACT, NEwMCDBK, NEwMODBY >3. GQCDSPP, BANKCALL, PINDVAC, INTPRET, INTSTALL, TPAQREE, 

INTWAKEU, ENDBXT, POSTJLMP, PALTCN, l«nHA®, WASQING 

normal BKIT* TC BTOBXT 

ALAIM/AaORr* IC PALTCN POLLCWBD BY TC BCDBXT 

BBSTWOS* IS CHUSD BV WE OflQ«D/ASniCNAl7E.S VERIPICATIW OF UPOATE 

' . .L.« »«»,.„ .S »» UPE,* 

activity LICNT is turned off. C just as ip a V 34E WAS SENT DURING P27 DATA LOADS). 
vrn VT1 V72 OR VT3 WILL HAVE TO BE COMPLETELY RESENT BY USER. 

2. AFT® vraiFLAO INVERSICNCWHai UPDATE OF THE SPECIFIED EHASABLES IS BEING PERPOft®)) 

PHOTECTHD AGAINST RESTARTS. 

debris* UPBUFF (20D) tsmp storacs for addresses and ccntents. 

UPVERB (1 ) verb NUMBER MINUS TOD IB.G. FOR VT2, UPVBRB = T 2D - TOD = 2) 

OPOLDMOD (1) FOR MAJOR MODE INTBBBUPIH) by P27 . 

(XMPNCTB (D total NU«BR OF CCMPCNENTS TO BE TRANSUTTSD. 

iiofV»MT (1) ACTUAL NU«ER CF CCMPCNENTS RECEIVED. 

UFiaiP Cl) SCRATCH, BUT USUAILY CONTAINS CCMPCNBNT Nir«EB TO BE CHA,NGBD IXJRI)«J VERIFY CYCLE 


KOHY* DESCRIPTION 

tnnPvwyvEnaocxB CLIFTOFF TIME INCREMENT) DOUBLE raBCISICN OCTAL TIME INCREMENT, XOCXX XXXXX, 
V700DOOOCE»OOOCE ‘LI^ To TOPHEM subtracted FRCM AGC CLOCkCTIME2,TIMEi), afflTRAClED FRCM CSM STATE 

VECTOR TICBCTETCSM) AND SUBTRACTED FRCM LEM STATE VECTOR TI.MBCTETLE4) . 
the dp octal time INCREMENT IS SCALED AT 2C28) . 



Hi 
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UOSO 

10051 

B0052 

W053 

■0054 

■0055 

■0050 

■0057 

mess 

■0060 

■0061 

■0062 

mo63 

■0064 

m065 

■0066 

■0067 

■0069 

m072 

■0073 


vtibiieaaa^ 

XXXXXB 

XXXXXB 

9 NEXT bank 


VT2EIIE 

AAAAEXXXXXB 

AAAAEXXXXXE 


ICtKTIGUXJS BUXV UPDATE) II -2 OCTAL CtMPCNaiTS.XXXXX 
are loaded into erasable swrtino at ecadh, aaaa 

IT IS .GB. 3 .AND. .LE. 20 D., 

AM) (AAAA *11-3) DOES NOT PHOXXS AN ADDRESS IN THE 

8 CALIN 0 IS SAME As INTBBIAL HBOISTEHS. 

(scatter UPDATE) (II-l )/2 OCTAL COfiKNBfTS.XXXXX, ARE 
LOADS) INTO erasable LOCATIONS, AAAA. 

II IS .OB. 3 .AND. .LE. 19 D, AM) MUST BE ODD. 

SCALING IS sane AS INTERNAL RBOISTERS. 


V73E)0CXXXEX)00(XB (OCTAL CLOC^ INCRa®(T) DOIELE PRECISION OCTAL TIME 
iNCRBerr looooi xaocx., is adds) to the aoc (xock in 
(3ENTI3ECCNDS SCALED AT (2)28. ’ 

THIS LOAD IS THE OCTAL EOJIvALaTT CP V 55 . 

•XITPUT’ IN addition TO THE ABOVE HEOISTER LOADS, ALL UPDATES 

<3CMPLB«NT BITS OP FIAGWORD 7 

ADDITKNAL NOIES- verb 71, JUST DEFINB) ABCVE WILL BE USED TO PERFORM Bur NOT LIMITED TO THE FOLLOWING UPDATES-- 

1. CSM/LM state vector UPDATE 

2 . HEPa44AT UPDATE 

THE FOLLOWING CQWENTS DELINEATE EACH SPECIAL UPDATE 


■0074 1. CM/IM STATE vector UPDATE<ALL DATA ENTRIES IN OCTAL) 


■0075 

■0077 

■0078 

m080 

■0082 

m083 

m084 

m086 

■0088 

m090 

■0092 

■0094 

m096 

■0098 

mi44 

mi45 


bitries’ data definition* 

VTlE CCNTIQUOUS BLOCK UPDATE VERB 

21 B MiBER OP CCMPCNBITS FOR STATE VECTOR UPDATE 

AAAAE ECADR op <AJPSVPLAa« 

XXXXXB state vector identifier* 


SCALE FACTORS* 


00001 for CS4, 77776 FOR LBI - EARTH SPHERE OP INFLUBICE SCALING 

XXXXXEXXXXXE X P08ITICN - UJMR SIHERE OP INFU®(CB SCALING 

XXXXXEXXXXXB Y POSITION 

XXXXXEXXXXXE Z POSITION 

XXXXXEXXXXXB X VELOCITY 

XXXXXEXXXXXE Y VELOCITY 

XXXXXEXXXXXE Z VELOCITY 

)OOOOCEXXXXXB TDB PRCH AGO CLOCK ZERO 

V33E VERB 33 TO SIGNAL THAT THE STATE VECTOR IS HEADY TO BE STOBH) 

2. refsnmatiall data BTIRIES in CX>IAL) 

entries* data definitions* scale factors* 
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ASSBWLB MO^ISICK 249 OP AOC PR(XS)AM CCLOSSCS BY NASA 2021111-041 
UPOATS PBOORAM 



110147 

vtie 



CCNTIGUOUS block UPDATE VERB 


110148 

34 B 


m>©BR OP COMPONENTS POa RSPa^WT UPDAIB 

niso 

AAAAB 


BCADR OP .REPBMAT. 




M 1 S 2 

XXXXXBXXXXXS 

ROW 

1 COLlMI 

1 




mis4 

XXXXXB)00(XXB 

ROW 

1 COUMI 

2 




mss 

XXXXXEIOOOOCE 

ROW 

1 COUNN 

3 




mss 

XXXXXBXXIOOCE 

ROW 

2 COLUPN 

1 




mso 

JOOCMCBXXXXXE 

ROW 

2 COLIMI 

2 




MISS 

X)00(XE)QOOO(E 

ROW 

2 COLUrtl 

3 




80164 

XXXXXEnOOOCE 

ROW 

3 COLIMT 

1 




MISS 

XXX}(XEX)00(XB 

ROW 

3 COUPW 

2 




mss 

XXXXXElOOOOCE 

ROW 

3 COUMI 

3 




110170 

V33B 



VERB 33 TO SIGNAL IHAT RBPa^WT IS READY TO BE STOW 

0171 





07,3717 



bank 

OT 

0172 

BBF 

4 

LAST 

538 

43,2000 



aSTLOC eytvbrbs 

0173 





43,3722 



bank 


0174 

BBF 

13 

LAST 

741 

E3,1706 



fflANKr 

TEPHEM 

0175 

REF 

1 






CCUNT* 1S/P27 

0176 

HHF 

1 



43,3722 

3 4714 

1 

V70UPOAT CAP 

UPTO 

0177 

REP 

2 

LAST 

230 

43,3723 

1 3731 

0 

TCP 

VT30POAT +1 

0178 

REP 

1 



43,3724 

3 4712 

1 

V71UPOAT CAP 

UPTl 

0179 

REP 

3 

LAST 1467 

43,3725 

1 3731 

0 

TCP 

V73UPDAT +1 

0180 

REP 

1 



43,3726 

3 4711 

1 

V72UPOAT CAP 

UPT2 

0181 

RHF 

4 

LAST 

1487 

43,3727 

1 3731 

0 

TCP 

V73UPDAT +1 

0182 

REP 

1* 



43,3730 

3 6214 

0 

V73UPOAT CAP 

UP73 

0183 

HEP 

1 



43,3731 

54 331 

1 

♦1 TS 

UPVERB SV 

0184 

HHF 

18 

LAST 

261 

43,3732 

0 2078 

1 

TC 

TESTXACT 

AOISS 










0188 

HEP 

16 

LAST 1372 

43,3733 

3 1011 

0 

CA 

MCDHBO 

0187 





43,3734 

0 0006 

1 

EXTEND 


0188 





43,3735 

1 3737 

0 

BZP 

+2 

0189 

REP 

1 



43,3736 

0 3747 

0 

TC 

CKMWORE 

A0190 










0191 

RHP 

19 

LAST 

1467 

43,3737 

31«011 

0 

CAE 

MCDRBO 

0192 

REP 

2 

LAST 

70 

43,3740 

54 301 

1 

TS 

UPOLDMOD 



USEIUS FACE NO. 3 EO S4 


2<-l> 

2(-l) 

2‘-l> 

2(-l> 

2<-l> 

2(-l) 

2(-l) 

2(-l) 

2(-l) 


CCMES HERE CN V70E 
COES HERE CN V7lE 
COES herb (N V72E 
COES HERE CN V 73E 

SAVE UPVERB until ITVS CK TO BITER P27 

(SWB DISPLAY IF AVAILABLE, 0IHEH»ISE 
1UIN40PERATOR ERROR* CN AfTO TERMINATBJOB 

OECK IP UPDATE ALLOWED 
FIRST check fob MQDREG = +0, -0 
(+0 = POO, -0 = FREai START) 

NOW CHECK PCR PROGRAM VIHICM CAN BE 
INTERHJPTED by P27. 

update allowed. 

SAVE CURRENT MAJOR MODE 
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0193 

RBP 

2 

last 1407 

43,3741 

30 331 0 


CAB 

UPVERBSV 

SET UPVERB TO INDICATE TO P27 

0194 

BEE 

2 

LAST 70 

43,3742 

54 302 1 


T3 

UPVEHB 

HHICH EXTENDED VERB CALLED IT. 

0195 

HBP 

175 

LAST 1454 

43,3743 

3 4712 1 


CAP 

CNB 


0190 

BBP 

2 

LAST 70 

43,3744 

54 303 0 


TS 

UPCOUNT 

initialize upcomr to i 

0197 

BBP 

05 

LAST 1483 

43,3745 

0 4574 0 


TC 

POSTJUMP 

LEAVE EXTENDED VERB BANK AND 

019B 

HEP 

1 


43,3748 

57364 1 


CADE 

UPPART2 

00 TO UPDATE PR0GHAMIP2TI BANK. 

0199 

RBP 

10 

LAST 1417 

43,3747 

4 0101 0 

C)a«Mcie cs 

FLAOWHDs 


0200 

hep 

33 

LAST 1444 

43,3750 

7 4703 0 


MAac 

bits 

CHECK IP CCMPUTER IS LOC 

0201 

REE 424 

LAST 1483 

43,3751 

10 000 0 


CCS 

A 

IS CCMPUTER LOC OR AOC 

0202 

REP 

1 


43,3752 

1 3760 1 

UPBHLB4 

TCP 

upehror 

error- ITWS the LEM ♦ MODE IS NOT POO. 

0203 

HEP 

T9 

last 1483 

43,3753 

4 4711 0 


CS 

TWO 


0204 

HEP 

20 

LAST 1407 

43,3754 

7 1011 1 


mask 

MCDREQ 


0205 

HEP 425 

LAST 1468 

43,3755 

10 000 0 


CCS 

A 


0200 

HEP 

2 

LAST 1468 

43,3756 

1 3760 1 

UPBBCMC 

TCP 

uperrob 

error- ITWS the CMC AND MODE IS NOT 

A0207 









Poo OR P02. 

0208 

REE 

361 

LAST 1484 

43,3757 

0 0002 0 


IC 

0 

ALLOW UPDATE TO PROCEED 

0209 

REP 

66 

LAST 1468 

43,3760 

0 4574 0 

UPEHBOR 

TC 

POSTJU4P 

TUR4 CN -OPERATOR ERROR- LIGHT 

0210 

REP 

1 


43,3781 

57745 0 


CADB 

UPERROUT +2 

00 TO CCM4CN UPDATE PROGHA.W EXIT 

0211 

BBP 285 

LAST 1456 

4714 


UP70 

EQUALS ZERO 


0212 

BBP 

176 

LAST 1468 

4712 


UP71 

equals Q® 


0213 

HEP 

80 

LAST 1468 

4711 


UP72 

Equals two 


0214 

REP 

53 

LAST 1450 

6214 


UP73 

equals three 


0215 




04,3650 



bank 

04 


0210 

REP 

2 

LAST 1300 

27,2000 



SETLOC UPDATE2 


0217 




27,3364 



bank 



0218 

REP 

1 





CCCNT* $$/P27 


0219 




27,3364 


UPPART2 

equals 


update program - PART 2 

0220 

REP 

102 

LAST 1414 

27,3364 

0 5301 0 


TC 

hiaschng 

set restart GRajP 6 TO RESTORE aO MCDE 

0221 




27,3365 

07026 1 


OCT 

07028 

AND DOWNLIST AND EXIT IP RESTART OCCURS 

0222 




27,3366 

30000 1 


OCT 

30000 

PRIORITY SAi® AS CHRPRIO 

0223 

REP 

T 

last 173 

0304 



EBANK= 

UPBuFP 


0224 

REP 

1 


27,3387 

03875 0 


2CADR 

UPCUT +1 


0224 

REP 

1 


27,3370 

56100 0 





0225 

REP 

177 

LAST 1468 

27,3371 

3 4712 1 


CAP 

Q® 


0220 

REP 

7 

LAST 1067 

27,3372 

54 332 1 


TS 

DNLSTCOD 

DOWNLIST 

0227 

REP 

13 

last 754 

27,3373 

0 5243 1 


TC 

NEWMQDEX 

set major mode = 27 

0228 




27,3374 

00033 1 


DEC 

27 




Ill 
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W329 

RBP 

3 

LAST 1468 

2T,33T5 

SO 302 

0 

•230 




2T.33T6 

1 3377 

0 

•231 




2T,33TT 

1 3402 

0 

•232 

REP 

1 


2T.3400 

1 3405 

1 

•233 

HEP 

2 

LAST 1469 

27.3401 

1 3405 

1 

•234 

REP 

81 

LAST 1468 

27.3402 

3 4711 

1 

•235 

RBP 

4 

lAST 1T3 

27.3403 

54 300 

0 

•23« 

RBP 

1 


27.3404 

1 3430 

1 

•23T 

RBP 

1 


27,3405 

3 3500 

1 

•23« 

RBP 

T26 

LAST 1452 

27.3406 

54 156 

1 

•239 

REP 

1 


27,3407 

3 3501 

0 

•240 

HEP 

249 

LAST 1463 

27.3410 

0 4555 

0 

•241 

REP 

13 

LAST 823 

27.3411 

20465 

1 

•242 

REP 

1 


27.3412 

1 3675 

1 

•243 

RBP 

3 

LAST 1469 

27.3413 

1 3407 

0 

•244 

REP 

1 


27.3414 

0 3471 

0 

•245 

RBP 

46 

LAST 1363 

27,3415 

4 4711 

0 

•24« 

REP 

8 

LAST 1468 

27,3416 

6 0304 

0 

•24T 




27,3417 

0 0006 

1 

•24S 

HEP 

4 

LAST 1469 

27,3420 

6 3407 

1 

•249 

RBP 

9 

LAST 1469 

27,3421 

4 0304 

1 

•250 

HEP 

1 


27.3422 

6 4376 

1 

•251 




27.3423 

0 0006 

1 

•252 

REP 

5 

LAST 1469 

27,3424 

6 3407 

1 

•253 

RBP 

10 

LAST 1469 

27.3425 

30 304 

0 

•254 

HEP 

5 

LAST 1469 

27,3426 

54 300 

0 

>0257 



UPBUFP LOVDING »3I««IE 


•2ST1 

HEP 

3 

LAST 1468 

27,3421 

24 303 

1 

•258 

HEP 

1 


27,3430 

3 3845 

0 

•259 

HEP 

4 

LAST 1469 

27,3431 

6 0303 

1 

•280 

HEP 

T27 

LAST 1489 

27,3432 

54 156 

1 

•261 

IBP 

2 

LAST 1469 

27,3433 

3 3501 

0 

•202 

IM' 

250 

LAST 1469 

27,3434 

0 4555 

0 

•2S3 

REP 

14 

LAST 1469 

27,3435 

20465 

1 

•204 

HEP 

2 

LAST 1469 

27,3438 

1 3675 

1 

•265 

REP 

2 

LAST 1469 

27,3437 

1 3433 

1 

•206 

HEP 

2 

LAST 1469 

27,3440 

0 3471 

0 

•20T 

REP 

5 

LAST 1469 

27,3441 

4 0303 

0 

•20B 

RHP 

6 

LAST 1469 

27,3442 

6 0300 

1 

•209 




27.3443 

0 0006 

1 

•2T0 

RBP 

1 


27,3444 

6 3446 

1 

•ZT2 

REP 

3 

LAST 1469 

27,3445 

1 3427 

1 

■•2T3 



vEBiPY seaceNOB 




INDEX UPVEB0 

ICP ♦! 


(HdELLl 


♦2 


TCP 
TCP 
ICP 
CA 
TS 
Tty 

CAP 

TS 

CAP 

TC 

CADR 

TCP 

TCP 

TC 

CS 

AO 

EXTBTO 

B2J4P 

CS 

AD 

BCIB® 

BZ4P 

CAE 

TS 


♦3 

OMELLl 

OMELLl 

WO 

CtMPNU* 

a«ieLL2 

ADUPBUPP 

MPAC +2 

UPLQADNV 

BANKCALL 

OCKOSPP 

upam 

CHSKElXl *2 

QC4V32 

BIT2 

UPBUFP 

OWELLl +2 

UPflUFP 

UP21 

OMELLi *2 
UPBOPF 

caimje 


INCH 

CHwELLp CAP 
AD 


♦2 TS 

♦3 CAP 

TC 

CADR 
TCP 
TCP 
TC 
CS 
AD 
ExToro 

BZiV UPVERIFY 
TCP aWELL2 -1 


UPCCUNT 

ADUPBFMi 

upcguNT 
MPAC +2 
UPUMDNV 

hankcall 

GCMJSPP 

UPOUTA 

aWELL2 +3 

Q(4V32 

UPCOUNT 

CCMPNLPB 


20*35 OCT. 28,1968 SATRAP .OOT PAOE 1469 
UffiBaS PAGE NO. 5 B3 S4 

^lANCH DBPEMJINO CN WHETHER THE UPDATE 

verb requires a pixed OB variable NUWER 

V70 PIXBO. <0P (XMPCNENTS. 

VTl VARIA^ - 00 GET NO. OF CCMPCNBITS 
V72 variable - 00 GET NO. OP CCMPCNEWTS 
VT3 <AND VTO) PIXED 
»T NU-BER op CCMPCNENTS to 2. 

00 GET THE WO UPDATE CCMPCNBITS 

* REQUEST user TO SEND NUBER * 

* OP CCMPCNENTS PARAMEIERI 1 1 ) . * 

(CIC4V32 RETURNS HERB IP V32 ENCOUNTERai) 
DISPLAY A PLASHING V21N01 

TO REQlEST II. 

V34 terminate UP0ATECP27) REIUIW 
DATA OB V32 RETURN 

IS IKNUBER op CCMPCNENTS PARANETER) 
.OB. 3 AND .LE. 20D. 


SAVE II IN CCMPNUMB 


INCREMENT CCUNT OP CCMPCNENTS RECEIVED. 
CALCULATE LOCATICNIECADR) IN UPBUFP 
«HERB next CCMPCNHNT SHOULD BE STORED. 
place ECADR into R3. 

(CX4V32 RETURNS HERE IP V32 0ICOUNTER0D) 
DISPLAY A PLASHING V21N01 
TO REQUEST DATA. 

V34 terminate UPDATE! P2T> HEluaN. 

V33 PROCEED RETURN 
DATA OR V32 RETURN 
HAVE WE PINISHED RECEIVING ALL 

the data we expected. 

YES- GO TO VEHIPICATICN SSaBNCE 
NO- BEQUEST ADDITIONAL DATA. 
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0274 


1 


27.3446 

3 3477 0 

UPVERIFY CAF 

ADUPTB4P 

0275 

HP 

728 

LAST 1469 

27.3447 

54 156 1 


T3 

MPAC 

0270 

HSP 

1 


27.3450 

3 3502 0 


CAF 

UPVRFYNV 

0277 

lep 

251 

LAST 1469 

27.3451 

0 4555 0 


IC 

BA)«cCALL 

0270 

fiBP 

15 

LAST 1469 

27.3452 

20465 1 


CADR 

GCKDSPF 

0270 

BBP 

3 

last 1489 

27.3453 

1 3675 1 


ICF 

UPOTTA 

0280 

n' 

1 


27.3454 

1 350 3 0 


TCP 

UPSTORB 

0281 

HP 

3 

LAST 1489 

27.3455 

0 3471 0 


ic 

CK4V32 

0282 

BBP 

2 

IAST 70 

27.3456 

3 0330 1 


CA 

UPTB4P 

0283 




27.3457 

0 0006 1 


EXTB® 

0284 

HP 

2 

last 1489 

27.3460 

6 3446 1 



UPVERIFY 

0285 

HP 

3 

last 1470 

27.3461 

4 0330 0 


CS 

UPTHMP 

0288 

BSP 

7 

LAST 1469 

27.3482 

6 0300 1 


AD 

C!MFNllB 

0289 

BSP 

82 

last 1433 

27.3463 

6 4712 1 


AD 

BlTl 

0290 




27.3464 

0 0006 1 


BXTHff) 

0291 

BSP 

3 

last 1470 

27.3465 

6 3446 1 


BzMF 

UPVERIFY 

0292 

BBP 

2 

last' 1469 

27.3466 

3 3645 0 


CAF 

ADOPBFMi 

0293 

BSP 

4 

LAST 1470 

27.3467 

6 0330 1 


AO 

UPTBMP 

0294 

BBP 

4 

last 1489 

27.3470 

1 3432 0 


TCF 

CHlELLZ *2 

0295 

BBP 

2 

LAST 1468 

27.3675 


UPQUT4 

equals UPCUT +1 

R0298 



CWQc POR VERB 32 SEQU^^CB 




0297 

OB' 729 

last 1470 

27.3471 

4 0154 0 

CK4V32 

CS 

MPAC 

0298 

IBP 

57 

LAST 1445 

27.3472 

7 4705 0 


mask 

Bills 

0299 

■BP 428 

LAST 1468 

27,3473 

10 000 0 


CCS 

A 

0300 

HBF 

362 

LAST 1468 

27,3474 

0 0002 0 


TC 

0 

0301 

IBP 

383 

last 1470 

27,3475 

50 002 0 


INDEX 

0 

0302 




27,3476 

7-7771 0 


TC 

0 -6 

0305 

IBP 

5 

last 1470 

27,3477 

00330 1 

ADUPTBMP adres 

UPTEMP 

0308 

BEP 

11 

LAST 1469 

27,3500 

00304 0 

ADUPBUPF ADRES 

UPflUPP 

0307 




27,3501 

05201 1 

UPLOIONV VN 

2101 

0308 




27,3502 

05202 1 

UPVRFYNV VN 

2102 

0309 

BBF 

3 

LAST 1174 

4376 


UP21 


)®1 

03121 

IBP 

30 

LAST 1435 

4715 


UPDTPHAS equals FIVE 

R0313 



PRE-STORE AND FAN TO APPROPRIATE BRANCH 

SEOJENCE 

0314 




27,3503 


UP STORE 

bcxials 


0315 




27,3503 

0 0004 0 


IMIINT 


0310 

RBF 

25 

LAST 1463- 

27,3504 

30 103 0 


CAE 

FLAGWHDi 

0317 

IBP 251 

last 1464 

27,3505 

56 001 0 


)!CH 

L 

0318 

IBP 

39 

LAST 1448 

27,3506 

3 4710 0 


CAF 

BIT3 

0319 




27,3507 

0 0006 1 


E)01TND 


0320 

HBF 

17 

last 1454 

27,3510 

06 001 0 


RXOR 

LCHAN 




20’35 OCT. 28.1988 SATOAP .OOT PAOE 1470 


USBR>S PAOB NO. 


riACe ECADR BHEHB CCMPCt®»T NO. INDEX 
IS TO ^ STORED INTO R3. 

<CiC4V32 RETURNS HERB IF V32 ENCOUNTERED) 
DISPLAY A FLASHINO V21N02 TO HBOUBST 
DATA CORRECTION OB VERIFICATION. 

V34 terminate UPDATE! P27> HETUIW 
V33 data sent is GOOD. 00 STORE IT. 
COMPONENT NO. INDEX OB V32 RETURN 
DOES THE CCMPCNarr NO. INDEX JUST SBTT 
specify a LEOAL CCMPCNaiT NLMBERjt 
NO. IT IS NOT POSITIVE NONZERO 


YES- BASED ON THE C(MPONENT NO. INDEX 
CALCUATE the ECADR OP LOCATION IN 
UPBUFV WHICM user WANTS TO CHANGE. 


COBS HERE ON V34 TO TEKHINATE UPDATE 


ON DATA RETURN FROM «GCSCDSPF<« 

ON data RETUTO! FROM «GCKDSPAd THE CCN- 
TfiTTS OP MPAC = VERB. SO TEST FOB V32. 
ITWS NOT A V32, IT»S DATA. PROCEED. 


V32 BICCUNTERED _ GO BAQo AND GET DATA 


address OP temp STORAGE FOR CORRECTIONS 
ADDRESS OF UPDATE DATA STORAGE BUFFER 
VERB 21 NOUN 01 
VE(« 21 NOUN 02 

DEC 21 = MAX NO OP CO!PONENTS +1 




ground has verified update, store data. 


INVERT VERIFIA0(BIT3 OP FIAQWBD7 ) TO 
indicate TO THE GROUND! VIA DOWNLINK) 
that the V33( which the GRQlpro SENT TO 
VERIFY THE UPDATE) HAS BEEN SlXICBSSFin.l,Y 
RECEIVED BY THE UPDATE PROGRAM 


I 
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II 
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9321 

rey 

20 

LAST 1470 

27,3511 

54 103 1 

0322 

HBP 103 

LAST 1468 

27,3512 

0 5301 0 

0323 




27,3513 

04020 1 

0324 




27,3514 

0 0004 0 

0325 

tep 

82 

LAST 1489 

27,3515 

4 4711 0 

0326 

BBP 

4 

LAST 1469 

27,3516 

6 0302 0 

0327 




27,3517 

0 0006 1 

0328 

BBP 

1 


27,3520 

6 3527 1 

R0330 



VERB 73 IWNCH 


0331 




27,3521 

0 0006 1 

0332 

BBP 

12 

LAST 1470 

27,3522 

3 0305 1 

0333 

BBP 

13 

LAST 1471 

27,3523 

52 315 1 

0334 

BBP 

1 


27,3524 

0 355 2 0 

0335 

BBP 

7 

LAST 358 

27,3525 

0 4400 1 

0338 

REP 

3 

LAST 1470 

27,3526 

0 3675 0 

0337 

BBP 

T 

LAST 1417 

27,3527 

3 4371 0 

0338 

BBP 

34 

LAST 1446 

27,3530 

0 5042 1 

0339 

REP 

14 

LAST 1467 

E3,1706 


0340 

BBP 

1 


27,3531 

03534 0 

. 0340 

BBP 

1 


27.3532 

56103 0 

0341 . 

REP 

122 

LAST 1463 

27,3533 

0 5112 0 

0342 

BH' 

245 

LAST 1336 

27,3534 

0 6006 1 

0343 




27,3535 

77624 1 

0344 

BBP 

32 

LAST 1298 

27,3536 

27371 1 

A0345 






0346 




27,3537 

77776 1 

0347 

BBP 

104 

LAST 1471 

27,3540 

0 5301 0 

0348 




27,3541 

04026 1 

0350 

BBP 

55 

LAST 1444 

27,3542 

0 5 435 0 

0351 

BBP 

5 

LAST 1317 

27,3543 

00238 0 

0352 




27,3544 

0 0004 0 

0355 




27,3545 


0356 

BEP 

5 

LAST 1471 

27,3545 

50 302 0 

0357 




27,3546 

1 3547 0 

0358 

BBP 

1 


27,3547 

1 3706 1 

0359 

BEP 

1 


27,3550 

1 3615 1 

0360 

BEP 

1 


27,3551 

1 3647 0 

R0361 



BarriNB to 

INCREMENT CLOCK! TI; 


UPeM>73 


UPJQB 


UPWAKB 


OPPAKTS 


USBBoS PACB NO. 


B3 84 


T3 

piAOfior 


TC 

FHASOtO 

ffiT RESTART tJBOUP 6 TO REDO THE UPDATE 

OCT 

04026 

DATA STORE IP A RESTART OtXXjBS. 

DWINT 


(BECAUSE FHASCHNO DID A BELINT) 

CS 

TWO 

GO TO UPPMVAC IP INSTALL IS REOJIBED, 

AO 

UPVEBB 

THAT IS, IP IT»S A V70 - VT2. 

ExTB© 


GO TO UPENDT3 IP IT.S A V73. 

BzMP 

UPPMVAC 


EXTBTO 


V73-PEBP0IW DP octal AOC CLOCK INCREfrENT 

OCA 

UPBUPP 


OXCH 

UPfiUFP +80 


TC 

TD«DIDt. 


1C 

PALTCN 

ERROR- TURN CM ♦OPERATOR ERROB4 LIGHT 

TC 

UPOLTT +1 

GO TO CCM4(M UPDATE PROGRAM EXIT 

1 CAP 

CHHPBIO 

(Uffi EXTBTOHD verb PRIORITY) 

TC 

PINDVAC 

GET VAC AREA POR «CALL INTSIALL. 

EBANK= 

TEPHB4 


2CADR 

UPJCB 

(N01E> THIS WILL ALSO SET EBANK FOB 

TC 

BJDOPJCB 

«TEPHEM« update by V70) 

TC 

INTPBET 

THIS COULD BE A STATE VECTOR UPDATE— SO 

CALL. 


WAITCPUT job to SLEEP) IP ORBIT INT(OI) 


INTSTAIL. 

IS IN PROGRESS — OR — GRAB 01 AND RETURN 

TO UPWAkE ip 01 IS not in PROGRESS. 


EXIT 



TC 

PHASQINO 

RESTART PB0IECT( group 6> 

OCT 

04026 


TC 

UPPLAO 

SET INTEGRATICM RESTART BIT 

ACRES 

HBINTFLG 


INHINT 



EQUALS 



INDEX 

UPVEBB 

BRANCH TO THE APPROPRIATE UPDATE 

TCP 

+1 

ROUTINE TO ACTUALLY PERFORM THE 1 

TCP 

upendto 

V70 

TCP" 

UPEMDTl 

VTl 

TCP 

UP©ID72 

VT2 
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•363 




27,3552 

0 0006 1 

TI^B)1DL BXTB® 


•364 

RES' 

6 

IAST 1470 

27,3553 

22 330 1 

0(CH 

UPT»1P 

SAVE 0 POR REHJRN 

•365 

rep 

288 

LAST 1468 

27,3554 

3 4714 1 

CAP 

ZERO 

ZERO AND SAVE TI(«2,TIMBi 

•366 




27,3555 

22 007 0 

21, 


•36T 

RKP 

34 

last 1416 

27,3558 

52 025 1 

0){CM 

TIi«2 


•368 

REP 

14 

LAST 1471 

27,3557 

52 327 0 

PXCM 

UPfiUPP «-18D 

STCBE IN CAS CP OVERPLCW 

•389 

REP 

1 


27,3560 

3 4715 0 

CAP 

UPOTPHAS 

DO 

•3T0 

REP 

252 

LAST 1470 

27,3561 

54 001 1 

T3 

l 

A 

•3T1 




27,3562 

4 0000 0 

CCM 


QUICK 

•3T11 

REP 

3 

last 652 

27,356 3 

52 765 1 

OXCH 

-PHASES 

PHASCHNO 

•3T2 




27,3564 

0 0004 0 

TIWDIDH I1«INT 


03T3 

REP 

287 

last 1472 

27,3565 

3 4714 1 

CAP 

ZERO 


•3T4 



• 

27,3566 

22 007 0 

ZL 


PICK UP incrementeriand zero 

•3T5 

REP 

730 

last 1470 

27,3567 

54 156 1 

T3 

MPAC *2 

IT IN CA® OP RESTARTS) AND 

•3T8 

HEP 

15 

last 1472 

27,3570 

52 315 1 

DXCH 

UPBUFP tsD 

STORE IT 

•3TT 

BEP 731 

LAST 1472 

27,3571 

52 155 1 

PXCH 

MPAC 

. INTO MPAC POR TPAGHEE. 

•3T8 




27,3572 

0 0006 1 

EXTEND 



•379 

REP 

16 

LAST 1472 

27,3573 

3 0327 1 

DCA 

UPBUPP +18D 


•380 

REP 

732 

LAST 1472 

27,3574 

20 155 1 

DAS 

MPAC 

FORM SlW IN MPAC 

•381 




27,3575 

0 0006 1 

Exraro 



•382 

REP 

1 


27,3578 

1 3605 0 

BtP 

DELTA TCK 

TEST POR OVERFLOW 

•383 

REP 

288 

last 1472 

27,3577 

3 4714 1 

CAP 

zero 


•384 

REP 

17 

LAST 1472 

27,3600 

52 327 0 

DxCH 

UPBUPP +1bD 

Overflow, restore old value op clock 

•385 

HEP 

35 

LAST 1472 

27,3601 

20 025 1 

DAS 

TBez 

AND TUIW CN OPERATOR ERROR 

•386 

fSF 

105 

last 1471 

27,3602 

0 5301 0 

TC 

PHASCHNO 

RESTART PROlECTiraiOUP 6) 

•387 




27,3803 

04026 1 

OCT 

04026 


•388 

REP 

7 

last 1472 

27,3604 

0 0330 1 

TC 

uptemp 

CX) TO ERROR EXIT 

•389 

REP 

14 

last 1418 

27,3605 

0 7226 0 

dbltatqc tc 

TPAGHl® 

force SIGN AGiREEMENT 

6390 

REP 733 

last 1472 

27,3608 

52 155 1 

DxCH 

MPAC 


•391 

REP 

36 

LAST 1472 

27,3607 

20 025 1 

DAS 

TK«2 

INCRBeiT TIMB2 ,TIi'«i 

•392 

REF 

106 

LAST 1472 

27,3810 

0 5301 0 

TC 

PHASCHNO 

restart proiectc group 6) 

•393 




27,3611 

04026 1 

OCT 

04026 


0394 




27,3612 

0 0004 0 

INHINT 



0395 

REF 

8 

LAST 1472 

27,3613 

50 330 1 

INDEX 

UPTH>1P 

(CODED THIS WAT FOR RESTART PROTECTIUN* 

•396 




27,3614 

0 0001 0 

TC 

1 

normal return 

110397 



VERB 71 BRANCH 





•402 

REF 

18 

LAST 1472 

27,3615 

30 305 1 

UPENDti CAE 

UPBuFP +l 

set EBANK 

0403 

REF 

66 

LAST 1443 

27,3616 

54 003 0 

T3 

EBANK 

AND 

6404 

REF 

17 

LAST 1403 

27,3617 

7 4373 0 

MASK 

LOWS 

calcvaate 

0405 

REP 

9 

LAST 1472 

27,3620 

54 330 0 

TS 

UPTPMP 

S-REG VAlUe OP RECEIVING AREA 



i 
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A 




0400 


s 

LAST 

1403 

27,3621 

0407 

ler 

8 

lAST 1470 

27,3622 

0408 





27,3623 

0409 

lep 

1 



27,3624 

0410 


39 

lAST 1435 

27,3625 

0411 

ter 427 

LAST 

1470 

27,3626 

0412 

ter 

2 

LAST 1468 

27,3627 

0413 


. 0 

lAST 1473 

27,3630 

0414 

ter 

' 0 

LAST 1473 

27,3631 

0415 

ter 734 

LAST 

1472 

27,3632 

0418 

ter 

428 

LAST 

1473 

27,3633 

0417 

ter 

19 

LAST 

1472 

27,3634 

0418 

ter 

253 

LAST 

1472 

27,3635 

0419 

ter 735 

LAST 

1473 

27,3836 

0420 

■EP 

10 

LAST 1472 

27,3837 

0421 

429 

LAST 

1473 

27,3840 

0422 





B3,1400 

0423 





27,3641 

0424 

BEP 

IS 

LAST 

1471 

E3,1706 

0425 

BBP 738 

LAST 

1473 

27,3642 

0426 

PBF 

2 

LAST 

1473 

27,3643 

0427 

lep 

4 

LAST 

1471 

27,3644 

0428 

BBP 

20 

LAST 

1473 

27,3645 

0429 

BHF 

5 

LAST 

1473 

27,3646 

R0430 



VERS 72 branch 

0431 

ter 

83 

LAST 

1470 

27,3647 

0432 

ter 

10 

LAST 

1473 

27,3850 

0433 

ter 430 

LAST 

1473 

27,3651 

0434 





27,3652 

0435 

SEP 

■ 3 

LAST 1473 

27,3853 

0451 

BEP 

47 

LAST 1489 

27,3654 

0452 

BBP 

11 

LAST 

1473 

27,3655 

0453 

WP 737 

LAST 

1473 

27,3656 

0454 

BBP 431 

LAST 

1473 

27,3657 

0455 

BBP 

21 

LAST 

1473 

27,3660 

0456 

ESP 432 

LAST 

1473 

27,3661 

0457 

BBP 738 

LAST 

1473 

27,3662 

0458 

BBP 739 

LAST 

1473 

27,3663 

0459 

BBP 433 

LAST 

1473 

27,3664 

0460 

BEP 

22 

LAST 

1473 

27,3665 

0461 

BBP 

07 

LAST 

1472 

27,3666 

0462 

ter 

18 

LAST 

1472 

27,3667 

0463 

ter 434 

LAST 

1473 

27,3870 

0464 





B3,1400 

0465 





27,3671 

0466 

BBP 

16 

LAST 

1473 

E3,1706 


6 7714 

1 

AD 

NBQ3 

6 0300 

1 

AO 

CCMPNIPB 

0 0006 

1 

EXiacD 


1 36 32 

1 

BIT 

STORLP71 

7 4702 

1 

msK 

BIT9 

10 000 

0 

CCS 

A 

1 3743 

0 

tpt 

UPEHROUT 

3 7714 

1 

CA 

NB03 

6 0300 

1 

AO 

CCMPNU* 

54 154 

0 

ST0BLP71 TS 

MPAC 

50 000 

1 

D«BX 

A 

3 0306 

1 

CA 

UPBUFP *2 

54 001 

1 

TS 

L 

3 0154 

1 

CA 

MPAC 

6 0330 

1 

AO 

UPTPMP 

SO 000 

1 

INDEX 

mANK= 

A 

1400 

23«400 

1 

LOCCH 

EaANK= 

1400 

TEPHEM 

10 154 

0 

CCS 

MPAC 

1 3632 

1 

ny 

STCHLPTl 

1 3674 

0 

TCP 

UPOUT 

00303 

1 

ADUPBPMl AtWES 

UPBUPP -1 

1 3874 

0 

TCP 

UPOUT 


3 4712 

1 

UPENDT2 CAP 

BITI 

7 0300 

0 

MAac 

CCMPNU* 

10 000 

0 

CCS 

A 

1 3654 

1 

TCP 

*2 

1 3743 

0 

TCP 

UPERHCUT 

4 4711 

0 

CS 

BIT2 

6 0300 

1 

AO 

CCMPNIP® 

54 154 

0 

LDLOOP72 TS 

MPAC 

50 000 

1 

INDEX 

A 

30 305 

1 

CAB 

UPBUFP +1 

22 000 

1 

UCCM 

A 

10 154 

0 

CCS 

MPAC 

54 154 

0 

TS 

MPAC 

50 000 

1 

MIEX 

A 

30 305 

1 

CAE 

UPBUPP -i-l 

54 003 

0 

TS 

EBANK 

7 4373 

0 

MAac 

LOW8 

50 000 

1 

IM)EX 

EBANKr 

A 

1400 

23<>400 

1 

LKCM 

EHANK= 

1400 

TEPHB4 


Df THE PROCESS OP 
PBRPOiWINO 
THIS UPDATE 
WILL «8 
(VBBPLOW 

INTO THE NEXT EBANK 

YES 

NO- calculate Ntf«BR OP 

WOBDS TO BB STORED MINUS ONE 

SAVE NO. OP WORDS REMAININO MINUS ONE 

take next update word PRCM 

UPftJFP AND 
SAVE IT IN L 

calculate next 
recbivino address 


update the RBaiSTEH by colihlts op l 

ARB there any WOBDS LEPT TO BE STORED 
YES 

NO- THEN EXIT UPDATE PROGRAM 

SAfe AS ADUPBUPP BUT LESS 1 (DCN«T MCVE) 

NO- EXIT UPDATECHEHE WHSC CXWPNUEB = 3) 


have an cdo no. op ccmpcnents 

BEEN SENT FOR A V72 UPDATE. . . 

YES 

ERROR- aiCULD BB OXJ NO. OP CCMPCNENTS 


NOW perform the update 

PICK UP NEXT update WORD 

SET POINTER TO ECADB(t4JST BE CCS) 


PICK UP NEXT ECADH OP BEG TO BB UPDATED 
SEP EBANK 

ISOLATE RELATIVE ADDRESS 


UPDATE THE REGISTER BY CONTENTS OP L 



) 



Ill 


ASSBBLE BBVISKW 249 OP AOC PBtXSMM COLOSSUS BY NASA 2021111-041 
WIMTB ntOOBAH 


MtT KB' 


T40 

1 


■0469 

MT* 

MTl 

•4TZ 

•4T3 

•4T4 

MTS 

MTS 

MTT 

MTS 

MTS 

S480 

■MSI 

5452 

5453 


RES' 1 
REP 3 
HEP 14 
HEP 289 
REP 8 
HEP 3 


I^ST 14T3 


last 148T 
last 1488 
last 1472 
last 1468 
last 583 


IT 

4 


last 1392 
last 14T2 


HS' 38 last 891 


27,3872 

10 154 0 


CCS 

MPAC 

27,3873 
[W OP P27 

1 3858 0 


TtSP 

LDLOOP72 

27,3874 


upoirr 

Equals 


27,3874 

0 2682 1 


TC 

INTWAkEU 

27,3875 

30 301 0 

+1 

CAE 

UPCLDMOD 

27,3878 

0 5246 1 


TC 

NEWMCDEX +3 

27,3877 

3 4714 1 


CAP 

zero 

27,3700 

54 332 1 


T8 

DNLSTCOD 

27,3701 

0 3750 0 


TC 

UPACTOPP 

27,3702 

0 0006 1 


EXTEND 


27,3703 

3 4714 1 


DCA 

NEOo 

27,3704 

52 765 1 


DXCH 

-fHASEe 

27,3705 

0 5423 1 


TC 

btoext 


S485 


S4ST 

5458 

5459 
M90 
MSI 
MS2 
MS3 

MM 

MSS 

MSS 

MST 

MSS 

MSS 

S5M 

■SOI 

5502 

5503 





27,3706 

RBP 

23 

last 1473 

27,3107 

BBP 

24 

LAST 1474 

27,3710 

REK 

2 

last 1471 

27,3711 

REF 

4 

last 1473 

27,3712 

RBP 

17 

last 1473 

■3,1706 




27,3713 

RBP 

25 

LAST 1474 

27,3714 

RHP 

28 

LAST 1474 

27,3715 




27,3718 

REP 

27 

last 1474 

Z7,3717 

RBP 

28 

last 1474 

27,3720 

HH' 

107 

last 1472 

27,3721 




27,3722 

HEP 

290 

last 1474 

27,3723 




27,3724 

RHP 

29 

LAST 1474 

27,3725 

REP 

3 

LAST 204 

27,3726 

HEP 291 

last 1474 

27,3727 




27,3730 

REP 

30 

last 1474 

27,3731 

REP 

3 

last 84 

27,3732 


0 0006 1 

upe<D7o Extend 

4 0305 0 

DCs 

UPBUFP 

52 315 1 

Dxch 

UPBUPE +8D 

0 355 2 0 

TC 

TINKTIDL 

0 3743 1 

TC 

UPBRROUT 


EaANK= 

TEWEM 

0 0006 1 

EXTHMD 


4 0305 0 

DCS 

UPfiUFP 

52 317 0 

Dxch 

UPBUPP +10D 

0 0006 1 

EX^E^a) 


4 0305 0 

DCS 

UPBuFP 

52 321 0 

DxCH 

UPBUFP +12D 

0 5301 0 

TC 

PHASCHNG 

04026 1 

OCT 

04028 

3 4714 1 

CAP 

zero 

22 007 0 

ZL 


52 317 0 

DXCH 

UPBUPP +10D 

21«571 1 

DAS 

TElCSM 


3 4714 
22 007 
52 321 
21«643 


CAP 

ZL 

DXCH 

ms 


zero 

UPBin=P +120 
TE1L0>1 




20*35 OCT. 28.1968 SATRAP .007 PAGE 1474 
USERaS PACE NO. 10 Bir S4 

Are se through the vt 2 update 
NO 


HELEASE GRAB OP ORBITAL INTEORATICN 
HBSTORB PRIOR P27 MODE 


TUIH OPP .UPLINK activity. LIGHT 
KILL (StOUP 6. 

EXTBTOBO VERB EXIT 

V70 DOES THE FOLLQ7INO WITH DP DELTA 
TI^e IN UPflUPP 

dbcr&snt agc clock 

Error while decrementing clock ~ exit 


copy DGCHE>tiNTERS POR 
restart proiecticn 


RESTART PROreCKGRCUP 6) 


decreet CS4 state vector tine 


decrement LEM STATE VECTOR TINE 





ASSB«LB REVISION 249 OP AOC PRQQRAM COLOSSUS BY NASA 2021111-041 


20’35 OCT; 28,1968 SATRAP .OOT PACE 1475 


UFOATB PROORAM 



0504 

REP 

292 

LAST 1474 

27.3733 

3 4714 1 

CAP 

^RO 

0505 




27,3734 

22 007 0 

a. 


0506 

REP 

31 

LAST 1474 

27,3735 

52 305 0 

OXCM 

UPBUPP 

050T 

REP 

18 

LAST 1474 

27,3736 

21«710 1 

DAS 

TEWEN *1 

0508 

REP 

19 

LAST 1475 

27,3737 

27«706 0 

ADS 

TEPHH4 

0509 

HEP 

108 

LAST 1474 

27.3740 

0 5301 0 

TC 

PHASCMNO 

0510 




27.3741 

04028 1 

OCT 

04026 

0511 

BBP 

32 

LAST 1475 

0304 


EBANKr 

UPflUPP 

0512 

REP 

6 

LAST 1473 

27,3742 

0 3674 1 

TC 

UPCUT 

R0513 



ERROR seouCNCE 




0514 

REP 

8 

LAST 1471 

27,3743 

0 4400 1 

UPERROUT TC 

PALTCN 

0515 

HEP 

7 

LAST 1475 

27.3744 

1 3874 0 

TCP 

UPOUT 

0516 

REP 

9 

LAST 1475 

27 , 3745 

0 4400 1 

♦2 TC 

PALTCN 

OSIT 

REP 

4 

LAST 1474 

27 , 3748 

0 375 0 0 

TC 

UPACTOPP 

0518 

REP 

39 

LAST 1474 

27,3747 

0 5423 1 

TC 

fiTOEXT 


A0519 
A0520 
A0521 
AOS 22 
B0523 

0525 

0527 

0528 
0530 


USElfeS PACE NO. 11 B3 S4 

INCREMOrr TP lEPHEM 

restart PROffiCTIGROUP 6) 

00 TO STANDARD UPDATE PROGRAM EXIT 


TUWI (N *OPEBATOR ERROR* LICET 
GO TO CCM4CN UPDATE PROGRAM EXIT 

TUWI CN .OPERATOR ERROR. LKKT 

TUrei OPF.UPLINK ACTIVITY.LiaiT 

EXT&IDBD VERB EXIT 

(THE PURPOSE OP UPERROUT +2 EXIT IS 

TO PROVIDE AN ERROR EXIT WHICH DOES NOT 

reset any restart GROUPS) 


•UPACTOFP* IS A ROUTINE TO TUiei OPP UK,INK ACTIVITY LKHT CN ALL EXITS FRCM UPDATE PROGRAMCPZT) . 


RH' 

40 

LAST 

1470 

27,3750 

4 

4710 

1 





27,3751 

0 

0006 

1 

HEP 

36 

LAST 

1446 

27,3752 

03 011 

1 

REP 

364 

LAST 

1470 

27,3753 

0 

0002 

0 


UPACTOPP CS BIT3 

ExT®ro 

wand dsalmcut 
TC O 


TUIN OPP UPLINK activity LIGHT 
(BIT 3 OP CHANNEL n) 



ASSB«l« BBVISKM 249 OP AOC PBOOWM COLOSSUS BY NASA 2021111-041 
RIfl OP O0DB3 


20’35 OCT. 28,1908 SATRAP .OOT PAOB 1478 
imus PAOB NO. 1 Bo 84 


0001 

0002 RB' 1 

0003 


22,3505 

22,2000 

22,3505 


0004 HEP 13 LAST 1327 85,1713 

0005 RBP 1 

*0000 U»D TMB2, TIMBl INTO MPAC> 


HA»*C 22 
aenuic mBcaoBs 
HAJOC 

ffiA^0C= XNB 
COPIT* »t/RlB 


HEP 3T LAST 1472 
HEP 2 lAST 1094 


22,3505 0 0000 1 LOIDTI!* EXTB© 

22,3500 3 0025 0 OCA TINE2 

22,3507 1 8024 0 TCP SLCWD2 


OIMVBHT the SINC2.E PRBCISICN 2«S CCMPteOENT NLPffiH ARRIVINO IN MPAC (SCALHO IN HALP-RBVOUJTICNS) TO A 
DP 1«S OOWLEOan' (0«BR SCALHO in REVOLCTICNS. 

HEP 741 lAST 1474 22,3510 10 154 0 CDULQOIC CCS MPAC 

HEP 293 last 1475 22,3511 3 4714 1 CAP ZERO 

22.3512 1 3515 1 TCP +3 

22.3513 13 514 0 NOOP 

REP 25 LAST 1177 22,3514 4 4875 0 Cs fHLP 

HEP 742 LAST 1478 22,3515 54 155 1 T3 MPAC +1 

HEP 294 LAST 1470 22,3518 3 4714 1 CAP ZERO 

REP 743 LAST 1478 22,3517 56 154 1 XCH MPAC 

22,35 20 0 0 0 06 1 EXIBSD 

HEP 28 LAST 1476 22,3521 7 4675 0 MP HALP 

HEP 744 LAST 1476 22,3522 20 155 1 DAS MPAC 

HEP 68 LAST 1355 22,35 23 1 6030 0 TCP DANZIO MODE IS ALREADY AT DO BIR_pnKr;i«irfci 


HEAD the pips INTO MPAC WITHCX/T CHANGING THEM’ 


MODE IS already AT DCUBLE-PHECISIQN 


0041 



22,3524 

0 0004 

0 

READPIPS TNHIMT 


0042 

REP 13 

last 1397 

22 , 35 25 

3 0037 

0 

CA 

PIPAX 

0043 

HEP 745 

last 1478 

22,3526 

54 154 

0 

TS 

MPAC 

0044 

REF 4 

LAST 1397 

22,3527 

3 0040 

0 

CA 

PIPAY 

0045 

REP 746 

last 1476 

22,35 30 

54 157 

0 

TS 

MPAC t-s 

0048 

REP T 

last 1397 

22,3531 

3 0041 

1 

CA 

PIPAZ 

0047 



22,3532 

0 0003 

1 

RBLIMT 


0048 

REF 747 

LAST 1476 

22,3533 

54 161 

0 

TS 

MPAC +5 

0049 

REF 295 

LAST 1476 

22,3534 

3 4714 

1 

CAP 

ZERO 

0050 

REP 748 

last 1476 

22,3535 

54 155 

1 

TS 

MPAC +1 

0051 

HEP 749 

last 1476 

22,3536 

54 160 

1 

TS 

MPAC *4 

0052 

REP 750 

last 1476 

22,3537 

54 162 

0 

TS 

MPAC +6 

0053 

REP 3 

last 1152 

22,3540 

1 6470 

0 

VECt^CDB TCP 

VMQDE 

R0054 


POBCE TP Slew AGREE«NT IN ,MPAC’ 


0055 

HEP IS 

last 1472 

22,3541 

0 7226 

0 

SGNAGRBE 1C 

TPAGREE 


20’35 OCT. 28,1968 SATBAP .OOT PAOB UTT 


ASSaetB BBVISIOH 249 OF AQC PBOGBAM COLOSSUS BY H^a^ 2021111-041 

rib op ocoes 

BHP sa LAST 14TB 22.3342 1 6030 0 TCF OWZIO 


USBRaS PAOB NO. 2 K S4 


BBF 69 LAST 14T6 22,3342 1 6030 0 TOP LWHZIU 

CONVERT THE DP 1«3 CCMPLEJ®<T ANGLE SCALED IN BEVOLUTItWS TO A SINGLE PRECISICN 2«S CCMPLH«NT ANO^ 
SCALED IN HALF-BEVOUJTIONS. 


Baf 296 LAST 14T6 
WF T51 ■ tAST 1476 
REF 5 IAST 1122 


22,3544 


0 357 3 

0 1STO2S 

ic 

ITOZSUB 

3 4714 

1 

CAP 

2ERO 

54 155 

1 

TS 

HPAC ♦! 

1 6027 

0 

TCP 

NEWMODB 


DO 1S1023 ON A VECTOR OF ANGLES’ 

LAST 1477 22,3547 0 3573 0 VISTO2S IC 


(BF 2 IAST 1477 

REF 752 LAST 1477 
RH' 753 last 1477 
IBP 3 LAST 1477 
REP T54 last 1477 

REF 755 last 1477 
REF 756 LAST 1477 
REF 4 LAST 1477 
REF 757 LAST 1477 

IBF 758 LAST 1477 
HEP 759 LAST 1477 

RHP 1T9 LAST 1468 
HEP 6 LAST 1477 


22.3550 52 162 0 

22.3551 52 155 1 

22,355 2 0 3573 0 

22.3553 54 156 1 

22.3554 52 160 1 

22.3555 52 155 1 

22.3556 0 357 3 0 

22.3557 54 155 1 

22.3560 3 0161 1 

22.3561 54 154 0 

22.3562 3 4712 1 TPMCDE 

22.3563 1 6027 0 


VISTO2S FOB 2 CCMpa®rT vector. USD BY HB. 


REP 5 
BBP 760 
HEP 761 
BH' 6 
REP 254 
FEP 762 
REP 3 


LAST 1477 
LAST 1477 
LAST 1477 
LAST 1477 
LAST 1473 
LAST 1477 
LAST 1476 


22.3564 

22.3565 

22.3566 

22.3567 

22.3570 

22.3571 

22.3572 


0 357 3 0 
52 160 1 
52 155 1 

0 357 3 0 
54 001 1 
3 0157 1 

1 6024 0 


2VISTO2S TC 

D)CCH 

DXCH 

TC 

TS 

CA 

TCP 


ITO2SLB 

HPAC +5 
MPAC 
1T02SUB 
MPAC +2 

MPAC *3 
MPAC 
ITO2SUB 
MPAC +1 

MPAC *5 
MPAC 

WE 

NEMMODE 


no2Sue 

MPAC *3 
MPAC 

1102 ajB 

L 

MPAC +3 
SLOID2 


ANSREH arrives IN A AND MPAC. 


MODE IS TP. 


SUBROUTINE TO DO DOUBLING AND i.S TO 2«S CCNVERSICN’ 


HEP 763 LAST 1477 


HEP 435 
BH' 179 


HEP 764 


LAST 1473 
LAST 1477 


22.3573 

22.3574 

22.3575 

22.3576 

22.3577 
22,3600 


52 155 1 
20 001 1 
10 000 0 
6 4712 1 
1 3601 1 
4 0000 0 


1T02SUB DXCH MPAC 

EOOUBI, 

CCS A 
AD CNE 

TCP +2 

CCM 


PINAL MPAC +1 unspecified. 


THIS WAS reverse op MSU. 


AND SKIP CN OVERFIXW. 


Ill 


*SSa«LB BBvISICM 249 op ago program COUMSUS by NASA 2021111-041 


L . RIB OP cooes 


0094 

HEP 385 

LAST 1475 

22,3802 

0095 

HEP 438 

last 1477 

22,3603 

0098 

HB' 8 

last 1177 

22,3604 

0097 

HEP 785 

last 1477 

22,3605 

0098 

HEP 388 

last 1478 

22,3606 


0 0002 

0 

TC 

0 

50 000 

1 

INDEX 

A 

3 4673 

1 

CAP 

limits 

26 154 

0 

AOS 

MPAC 

0 0002 

0 

TC 

0 



20’35 OCT. 28,1988 SATRAP .007 PAGE 1478 
US8IUS PACE MO. 3 ft 84 

<VERFLO«f l*«X3RflBOr A«> Df MSU. 



ASSa«LB BEVISIW 249 OP A® paOGSWM CXXjOSSUS BY NASA 2021111-041 


20’35 OCT. 28,1968 SATRAP .OOT PAGE 14T9 






L RIB OP CODBS USR«S PAGE NO. 4 BS S4 


P0099 



SlBROUTINB TO INCRSeTT COUS 




0102 

HEP 

1 


22,3607 

3 3622 1 

INCRCDUS CAP 

LOCTHBT3A 


0103 

HEP 

127 

IAST 1338 

22,3610 

54 130 1 

TS 

BUP 

PLACE ADHESCTHETA) IN BOP. 

0104 

REP 768 

LAST 1478 

22,3611 

30 154 1 

CAB 

MPAC 

INCHa«NT IN IS CCMPL. 

0105 

HEP 

1 


22,3612 

0 3823 0 

TC 

CDUINC 


0106 

REP 

128 

LAST 1479 

22,3613 

24 130 0 

INCH 

HUP 


OlOT 

HEP 

767 

LAST 1479 

22,3814 

30 157 1 

CAB 

MPAC 4.3 


0108 

REP 

2 

LAST 1479 

22,3615 

0 3823 0 

TC 

CDUINC 


0109 

REP 

129 

LAST 1479 

22,3616 

24 130 0 

inch 

BUP 


0110 

HEP 

768 

LAST 1479 

22,3617 

30 181 1 

CAE 

MPAC +5 


0111 

REP 

3 

LAST 1479 

22,3620 

0 3623 0 

TC 

CDUINC 


0112 

REP 

1 


22,3621 

1 3540 1 

TCP 

VECMODE 


0113 

HEP 

23 

LAST 1392 

22,36 22 

01155 1 

loctheta adhes 

THETAD 


R0114 



THE PQLLOsrlNO ROUTINE INCRENENTS IN 2 S CCHPLS«1ENT THE REOISIER VWOSE ADDRESS IS IN BUF BY THE 1 S CCMPL. 

R0116 

quantity 

FOUND IN TB42- THIS WY BE USED TO INCRE^^a^T DESIRED IHJ AND 

OPTICS C5XJ ANGLES OR ANY OIHER 2 S CCMPL. 

R0118 

(+0 

INEQUAL TO -0) 

quantity. 

MAY BE CALLED BY BANkCAIL/SWCALL . 

0119 

REP 

6 

LAST 1334 

22,3623 

54 142 1 

CDUINC TS 

TEM 2 

IS CCMPL. quant. Arrives in acc. store it 

0120 

HEP 

130 

LAST 1479 

22,3624 

50 130 0 

INDEX 

BUP 


0121 




22,3625 

10 000 0 

CCS 

0 

CHANGE 23 CCMPL. ANGLE ( IN BOFIINTO iS 

0122 

REP 

180 

LAST 1477 

22,3626 

6 4712 1 

ad 

GNE 


0123 




22,3627 

1 3633 0 

TCP 

+4 


0124 

HEP 

181 

LAST 1479 

22,3630 

6 4712 1 

AD 

GNE 


0125 

REP 

182 

LAST 1479 

22,3631 

6 4712 1 

AD 

CNE 

CVERPLCW HERE IP 2S CCMPL. IS 180 DEG. 

0126 




22,3632 

4 0000 0 

CCM 



0127 

REF 

7 

LAST 1479 

22,3633 

6 0142 0 

AD 

Tei 2 

SULT MOVES PRCM 2ND TO 3 D QUAD. (OR BACK) 

0129 

REP 

437 

LAST 1478 

22,3634 

10 000 0 

CCS 

A 

BAC^C TO 23 CCMPL. 

0130 

REF 

183 

LAST 1479 

22,3635 

6 4712 1 

AD 

CNE 


0131 




22,3636 

1 3640 1 

TCP 

+2 


0132 




22,3637 

4 0000 0 

CCM 



0133 

REP 

8 

LAST 1479 

22,3640 

54 142 1 

TS 

Tei 2 

3TQRE 14 BIT QUANTITY WITH PRESENT SKSI 

0134 




22,3641 

1 3645 1 

TCP 

+4 


0135 

REP 

438 

LAST 1479 

22,3642 

50 000 1 

INDEX 

A 

SIOI. 

0137 

REP 

9 

LAST 1478 

22,3643 

3 4673 1 

CAP 

LIMITS 

FIX IT, by adding in 37777 OR 4 OOOO 

0138 

REF 

9 

LAST 1479 

22,3644 

6 0142 0 

AD 

T&t2 


0139 

REP 

131 

IAST 1479 

22,3645 

50 130 0 

INDEX 

BUF 


0140 




22,3646 

54 000 0 

TS 

0 

STORE NEW ANGIE IN 23 C(MPI.&ieNT. 

0141 

REP 

367 

LAST 1478 

22,3847 

0 0002 0 

TC 

0 





i 


L 

P0142 


A3S»«LE HBVISICW 249 CF AOC PBOffiWM CQUBSUS Kf NASA 2021111-041 20*35 OCT. 28,1968 SAraAP .007 PAGE 1480 

Ris OP Cooes 


U»U8 PACE NO. 5 % 84 

RIB TO TOROE OTBOS, EXCBPT POR 1HB CALL TO DtlSXALL. ECADH OP CCMCINDS AHHIvBS IN XI . 


0144 REP 41 LAST 1294 22,3850 

0145 REP 90 LAST 1344 22,3651 

0146 BBf 252 LAST 1470 22,3652 

0147 HEP 6 LAST 714 22,3853 

0148 REP 70 LAST 1477 22,3854 


50 120 

1 

PULSE IMU INDEX 

PIXLOC 

3 0046 

0 

CA 

XI 

0 4555 

0 

1C 

BANKCALL 

17125 

1 

CADH 

IKJPUL® 

1 8030 

0 

TCP 

DANZIO 


ADDHESS OP OOW COMMANDS SHOULD IN XI 



I 

\ 



ASSB^BLB BBVISION 249 OP AOC PROGBAM CCLOSSU3 BY NASA 2021111-041 


20*35 OCT. 28,1968 SATRAP .007 PACE 1481 



L nB OP CODES USBBaS PACE NO. 8 BS S4 

P0149 BEJI ROUTINE TAKES A 3X3 MATRIX STORED IN DCXEIE PHECISICN IN A FIXED AREA OP ERASABLE MEMORY AND RBPIACBS IT 

R0151 wnH THE TRANSPOSE MATRIX. THANSPl IKES LOCATIONS XNB<.0,+1 1HR0UCH XNBtieD, itD AND THANSP2 USES LOCATIONS 

110153 XNBiO,*! THROUGH XNBi+ieD, itD. EACH MATRIX IS STORED BY RO»3. 


0154 

fBP 

14 

lAST 1476 

22,3655 

02713 

0 

XNBSa 

ECADR 

XNB 

0155 

tep 

5 

LAST 282 

22,3650 

02554 

1 

XNBiffl 

BCAOR 

XNBl 

0150 

SBP 

IS 

lAST 1481 

B5,1713 




ffiANK= 

XNB 

0164 

BSP 

1 


22,3657 

3 3655 

1 

TRANSPl 

CAP 

XNBffl 

0165 

HEP 

00 

LAST 1473 

22,3660 

54 003 

0 


TS 

E8ANK 

0106 

BBP 

16 

LAST 1481 

22,3661 

53«718 

1 


nxCH 

XNB *2 

0107 

BBP 

17 

LAST 1481 

22,3662 

53«722 

0 


DxCH 

XNB +6 

0106 

SEP 

10 

lAST 1481 

22,3663 

53»716 

1 


DXCH 

XNB +2 

0109 

IBP 

19 

LAST 1481 

22,3664 

53«720 

1 


DxCH 

XNB +4 

0170 

BBP 

20 

LAST 1481 

22,3665 

53«730 

0 


DxCH 

XNB +12D 

0171 

BBP 

21 

LAST 1481 

22,3666 

53«720 

1 


DXCH 

XNB *4 

0172 

BB' 

22 

LAST 1481 

22,3667 

53«728 

1 


DkCH 

XNB +ioD 

0173 

BEP 

23 

LAST 1481 

22,3670 

53«732 

1 


DxCH 

XNB +14D 

0174 

REP 

24 

LAST 1481 

22,3671 

53«726 

1 


DXCH 

XNB +ioD 

0175 

BBP 

71 

LAST 1480 

22,3672 

1 6030 

0 


TCP 

DANZIO 

0176 

BBP 

6 

LAST 1481 

E5,1554 




EBANK= 

XNBl 

0177 

BS' 

1 


22,3673 

3 3656 

1 

TBANSP2 

CAP 

XNBlEB 

0178 

BBP 

09 

LAST 1481 

22,3674 

54 003 

0 


TS 

ESANK 

0180 

BBP 

7 

LAST 1481 

22,3675 

53«557 

0 


DXCH 

XNBl +2 

0181 

BBP 

0 

last 1481 

22,3876 

53-563 

1 


DxCH 

XNBl +6 

0182 

BBP 

9 

LAST 1481 

22,3677 

53-557 

0 


DxCH 

XNBl +2 

0183 

BBP 

10 

lAST 1481 

22,3700 

53-561 

0 


DXCH 

XNBl +4 

0184 

BEP 

11 

LAST 1481 

22,3701 

53-571 

1 


DXCH 

XNBl +1^ 

0185 

BBP 

12 

LAST 1481 

22,3702 

53-581 

0 


DxCH 

XNBl +4 

0180 

BEP 

13 

LAST 1481 

22,3703 

53-567 

0 


DxCH 

XNBl +10D 

0187 

BBP 

14 

LAST 1481 

22,3704 

53-573 

0 


DxCH 

XNBl +14D 

0188 

BEP 

IS 

LAST 1481 

22,3705 

53-567 

0 


a<CH 

XNBl +10D 

0191 

BEP 

72 

LAST 1481 

22,3706 

1 6030 

0 


TCP 

DANZIO 




ASSBBLB RBVISICW 249 OP MC PROGRAM COLOSSUS BY NASA 2021111-041 
KIB OP Cooes 


20’35 OCT. 28jl96B SAIRAP .OOT PACE 1482 
USBR.S PACE NO. T 1^84 


M192 THB SlSRCXlTINB SIOMPAC SBrS C(MPAC, MPAC ♦!) TO SIQ4(MPAC) . 

R0193 POR mis, ONLY THE OCMIB1T3 OP WAC ARB BXAMINED. ALSO +0 YIELDS POSMAx AND -0 YIELDS NECMAx. 
ROigS B41HY HAY BE BY EITHER OP THE POLLORINO* 


R0196 1. 

B019T EWTHY* 


R0199 2. 

H0200 entry* 


LIMIT THE SIffi OP MPAC CN INTERPRETIVE OVERELOR* 
BOVS 

SIOMPAC 

<»ffiBATE IN MPAC THE SIGNUM PUNCtICN CP MPAC* 

RIS 

SICtMPAC 


110202 w either case, RETURL is to the next interpretive INSTHUCTICN in the calling SEa»(CE. 


0204 

0205 REP 

0208 HEP 
020T REP ■■ 

0208 BEP : 

0209 BEP 

0210 
0211 

0212 BEP 

0213 BEP 


LAST 353 
last 1479 
last 1479 
last 1477 
last 1477 


last 1482 
last 1482 


22,3707 

0 0006 

1 

SICfrWPAC EXTHMD 


22,3710 

3 4672 

0 

DCA 

DP094AX 

22,3711 

52 155 

1 

DXCH 

MPAC 

22,3712 

10 000 

0 

CCS 

A 

22,3713 

3 4714 

1 

DPMODE CAP 

zero 

22,3714 

1 6026 

1 

TCP 

SLOVD2 4-2 

22,3715 

1 3716 

0 

TCP 

♦1 

22,3716 

0 0006 

1 

Ext®© 


22,3717 

4 4672 

1 

DCS 

DPOa^AX 

22,3720 

1 6024 

0 

TCP 

SLOVD2 


sets MPAC +2 TO ZERO IN THE PROCESS 


interpretive INSTHXITICN LNIT, except that it CAN BE DEPENDED (H NOT TO BLOW 
■■ ^ COMPONENTS Are zero ip NOKHJIIT 

^ ^ halves op all CQMPOIENTS are zero, the MAGNITLDE returned in 36D will be too lABGE 

BY A FACTOR OP 2<13) AND THE SOJARED MAQMITUDE RETUiBffiD AT 34D WILL BE TOO BIO BY A FACTOR OP 2(26). 

BEP 184 LAST 1479 22.3721 3 4712 1 NQRMUNXl CAP ONE 

^ 1 22,3722 1 3724 1 TCP NOBMUNIT +1 

BEP 298 LAST 1482 22,3723 3 4714 1 NCJMJNIT CAP ZERO 

BEP 42 lAST 1480 22,3724 6 0120 1 AD PIXLOC 

BEP 770 LAST 1482 22,3725 54 156 1 TS MPAC +2 

^ 22,3726 0 4555 0 TC BANKCALL GET SIGN AGREES>eNT IN ALL COMPCNENTS 

BEP 3 LAST 1145 22,3727 01010 1 CADR VECAOREE 

BEP 771 LAST 1482 22,3730 10 154 0 CCS MPAC 

1 22,3731 1 3765 1 TCP NOailPT 

22,3732 1 3734 0 TCP *2 

BEP 2 LAST 1482 22,3733 1 3765 1 TCP NOEHIPT 

BEP 772 LAST 1482 22,3734 10 157 0 CCS MPAC +3 

BEP 3 LAST 148 2 22,3735 1 3765 1 TCP NOailFr 

22,3736 1 3740 0 TCP *2 

BEP 4 LAST 1482 22,3737 1 3765 1 TCP NOailPT 

HEP 773 LAST 1482 22,3740 10 16 1 0 (XJS MPAC *5 

BEP 5 LAST 1482 22,3741 1 3765 1 TCP NOSHIPT 

22,3742 1 3744 1 TCP +2 

BEP 6 LAST 1482 22,3743 1 3765 1 TCP NOSHPT 


22.3721 

3 4712 

1 

NQR6JNX1 CAP 

CNE 

22,3722 

1 3724 

1 

TCP 

N(»MUNIT +1 

22,3723 

3 4714 

1 

ncjmjnit cap 

ZERO 

22,3724 

6 0120 

1 

AD 

PIXLOC 

22,3725 

54 156 

1 

TS 

)«>AC +2 

22,3726 

0 4555 

0 

TC 

bankcall 

22,3727 

01010 

1 

CADR 

VECAOREE 

22,3730 

10 154 

0 

CCS 

MPAC 

22,3731 

1 3765 

1 

TCP 

NOailPT 

22,3732 

1 3734 

0 

TCP 

*2 

22,3733 

1 3765 

1 

TCP 

NOEHIPT 

22,3734 

10 157 

0 

CCS 

MPAC +3 

22,3735 

1 3765 

1 

TCP 

NOailFr 

22,3736 

1 3740 

0 

TCP 

*2 

22,3737 

1 3765 

1 

TCP 

NOailPT 

22,3740 

10 161 

0 

CCS 

MPAC *5 

22,3741 

1 3765 

1 

TCP 

NOSHIPT 

22,3742 

1 3744 

1 

TCP 

*2 

22,3743 

1 3765 

1 

TCP 

NOailPT 



ASSB^eL8 REVISION 249 


L 

RIfl 

OP CODES 


0238 

HEP 

774 

LAST 

1482 

0237 

0238 

REE 

85 

LAST 

1449 

0239 

REP 

775 

LAST 

1483 

0240 

RES' 

778 

LAST 

1483 

0241 

02411 

HEP 

88 

lAST 

1483 

02412 

REP 

777 

LAST 

1483 

02413 

HEP 

778 

LAST 

1483 

02414 

02415 

REP 

87 

LAST 

1483 

02416 

HEP 

779 

LAST 

1483 

02417 

REP 

5 

LAST 

1145 

02418 

REP 

780 

LAST 

1403 

02419 

0242 

REP 

67 

LAST 

1468 

0243 

REP 

2 

LAST 

1088 

02431 

REP 

299 

LAST 

1482 

02432 

R0300 

REP 1 

RTB VECSGNAO 

0301 

REP 

254 

LAST 

1482 

0302 

HEP 

4 

LAST 

1482 

0303 

REP 

73 

LAST 

1481 

*4* END 

OP satrap .007 *** 


OF AGO PROORAM COLOSSUS BY NASA 2021111^041 


22.3744 

3 0155 

0 

CA 

MPAC 

♦1 

22,3745 

0 0006 

1 

ElClB® 



22,3746 

7 4675 

0 

MP 

BIT14 


22,3747 

20 155 

1 

ms 

MPAC 


22,3750 

3 0160 

0 

CA 

MPAC 

+4 

22,3751 

0 0006 

1 

extend 



22,3752 

7 4675 

0 

MP 

BIT14 


22,3753 

20 160 

1 

ms 

MPAC 

♦3 

22,3754 

3 0162 

1 

CA 

MPAC 

+6 

22,3755 

0 0006 

1 

EXTEND 



22,3756 

7 4675 

0 

MP 

BIT14 


22,3757 

20 162 

0 

ms 

MPAC 

♦5 

22,3780 

3 4720 

0 

CAP 

thirteen 

22,3761 

SO 156 

0 

INDEX 

MPAC 

+2 

22,3762 

54 045 

1 

TS 

37 D 


22,3783 

0 4574 

0 

OPFIVNIT TC 

POSTJLMP 

22,3764 

01024 

0 

CADH 

UNIT 

+1 

22,3765 

3 4714 

1 

NOailFT CAP 

zero 


22.3766 

1 3781 

0 

TCP 

OPPIUNIT -2 

POHCES SICN A(3«Ea«NT OP VECTOR IN MPAC. 


22,3767 

0 4555 

0 

VECSGNAG TC 

bankcall 

22,3770 

01010 

1 

CADR 

VBCAGREE 

22,3771 

0 8030 

1 

TC 

mNzio 


20*35 OCT. 20,1968 SATRAP .007 PACE 1483 
USERxS PAOB NO. 8 Bs S4 
»IPT ALL CCMPCNaCTS LBPT 13 

ms OAINS A LITTLE ACCUHACTf 


SKIP THE ATC VECAGHfflA DONE AT LHIT 



»■ ASSSBLE HBVISKW 249 OP AOC PROGHAM COLOSSUS By MAM 2021111-041 20’35 OCT. 28,1968 P 

8»eOL TAKf LISTINQ, INCUDINO DBPIMITICN, HEALIH, PAOB OP DBP, / OP KBPS, PACE OP PIBST HEP, PAGE OP LAST BBP. 


PAOB 1484 


HBFERBMCBS 


DEP H 


BEPBReMOBS 


.650 

26,3237 

834 

1 

804 


.050811 

4710 

= 57 




.650SW 

0146 

= 57 

4 

804 

823 

.166... 

23,3430 

1331 

1 

1327 


.3D 

11,3674 

1321 

1 

1292 


.5SEC 

4731 

1171 

9 

127 

1414 

.6SECr5 

24,2774 

655 




«1KCSGN 

40,2204 

313 

1 

313 


«1XMN 

00,2610 

1138 

1 

1137 


♦LIMIT 

42,3252 

334 

1 

334 



87,1625 

= 120 

9 

120 

629 

*aN 

40,2314 

314 

3 

314 

353 

^lOLLl 

4T15 

= 960 

1 

958 


*BCLL2 

4732 

960 

1 

958 


^-TORQUB 

16,3652 

957 

1 

957 


♦2ACIDBO 20,2145 

687 

2 

686 


4NBS^^4 

23,3601 

1337 

1 

497 



23,3577 

1337 

5 

281 

887 

-Am 

83,1713 

= 84 

2 

618 

1220 

-BITlO 

06,2763 

155 

1 

151 


-BIT14 

7705 

1173 

2 

688 

904 

-OCSPR 

01,3153 

1168 

1 

1189 


-axrr*i 

20,3710 

1040 

1 

1039 



07,3544 

1410 

2 

1392 

1393 

-COPMlX- 

07,3545 

1410 

2 

1392 

1393 

-onsB 

^,1873 

- 93 

1 

93 


-OBLAIO 

86,1676 

= • 109 

5 

109 

1042 

-DELAHO 

86,1877 

S 109 

4 

109 

1042 

-oaAoo 

86,1675 

= 109 

3 

109 

1042 

-BLR 

05,3166 

189 

2 

185 

186 

-BSDERAS 

7712 

1173 

1 

1060 


-eMVAC 

6220 

1084 

2 

1080 

1098 

-HnHRAT 

34,2277 

531 

1 

528 


-POURDT 

17, 2002 

677 

1 

876 


-OyROHIN 

07,3322 

1402 

2 

1402 

1405 

-HSCALBD 

26,3313 

635 

1 

805 


-KSCALE 

26,3315 

635 

1 

805 


-KVSCALE 

37,3671 

642 

1 

836 


-WXADHS 

4364 

= 1364 

1 

1369 


-m^xdblv 

37,3135 

764 

1 

782 


-hutce) 

37,3355 

790 

1 

790 


-MUDINM) 

37,3357 

790 





-OJno 

-CM 

-PHASEl 

-PHASE 2 

-PHASB 3 

-PHASE 4 

-PHASES 

-PHASES 

-BOLLl 

-BQLL 2 

-SLOPE 

-T-3 

-TORQUE 

-TPER 

-UP 

-VM/360K 

-VMT/iaO 

-VREL 

-VT/I8O 

-VT/I8OE 

-1/Kfl2 

- 1/12 

-l/ 2»2 

- 1/8 

-lOK 

-ISDEOS 

-2SEC 

- 4 ACTOBO 

-50SC 

-6 . osoeo 

-TODEGS 


61T1 

40,2334 

0TS2 

0T54 

0T56 

OTSO 

0782 

0784 

4377 

18,3740 

16,3730 

15,3785 

16,3673 

E4,1745 

00,2620 

15,3772 

15,3772 

E7,152S 

E6,1613 

E6,1570 

26,3211 

13,3757 

00,2444 

7710 

43,3271 

06,2506 

10,3877 

20,2144 

04,3515 

26,3011 

06,2505 


1 1083 =14MS 

2 314 353 ======== 

6 181 1380 A 

3 181 197 A-PCHc 

3 181 526 AB(XOAD 

3 181 652 ABLOU) 

4 181 779 abort 

4 181 1474 AB0RT2 

1 958 ABS 

1 958 ABVAL 

3 95 3 955 ABVALABS 

1 1057 ACADN83 
1 957 ACADN85 

7 89 514 ACBD2y 

1 1137 ACBD2Z 

2 1054 1082 ACCEPTUP 

1 1054 ACCEPTW 

3 116 836 ACCCMP 

13 110 1055 ACCV© 

1 1053 ACORBD 

1 820 ACOS=0 
1 1311 ACOSABrt 
1 1155 ACOSCVP 

1 1069 ACOSSHR 

5 1366 1371 ACOSST 


1024 7 1010 1024 


00,2721 

00,2715 

00,2767 

00,2783 

00,2732 

00,2725 


1 143 ACOSST2 

1 1448 ACOSZERO 

1 686 ACOS3 

1 1247 ACrBOz 

1 763 ACRJETS 

1 143 ACRCU, 

==========r= actcent 

2 1141 active 


= .24 
=+.lSEC 
=tl4MS 
=-.lSEC 
=-2 
=-4 


21,2610 

17,3335 

21,3034 

17,3333 

7715 

6061 


2 1141 ACTLIM 

2 1143 ACTMT 

2 1143 ACyCHECK 

1 1142 ACYJBTS 

1 1142 ACzr 

============ ADB 

1 985 ADBvEL 

5 1021 1028 ADOINDRP 

1 987 ADDRESS 

3 1021 1024 ADOflWD 

4 1015 1028 ADENDBXT 

2 1015 1016 ADEHCCMP 


0000 
13,3136 
41,2612 
41,2677 
5604 
5624 
00,3226 
00,3201 
00,3176 
24,2402 
24,2406 
17,3435 
17,3500 
07,3626 
41,2027 
11,2430 
B5,1522 
E6,1630 
00,36 36 
00,3722 
00,3720 
00,3713 
00,3824 
00,3641 
00,3728 
00,3651 
17,3055 
17,3174 
17,3005 
H^,1632 
22,3376 
20,3161 
20,3413 
17,3113 
17,3210 
17,3453 
E6,1655 
Be, 1523 
33,3261 
6052 
0116 
25,3024 
33,3346 


WWLTH KSrf' NOHMALLy DBPINED IPTLESS PLAGGSD AS POLLCWS* 


439 80 1482 

4 1287 1300 
1 321 

1 321 


1 647 

2 642 644 

1 1027 

1 1027 

2 1418 

2 318 

1 1313 

2 433 

5 107 1028 

4 1159 1161 

1 1159 
1 1159 

1 1159 

2 1159 

1 1159 
1 1161 

2 1015 

2 1014 1027 I 

3 91 467 

2 464 490 

2 926 931 

2 937 

2 1016 1027 
2 1027 
7 108 1002 

4 1001 1004 

1 437 

79 1077 1338 
1 815 




{V IMJEPINED = DEFINED By EOiALS J DEPINBD BY JQcEH OR ERASE ANYWHERE «.n,TIpi,y DEFINED 

HI BADLY DEFLNED CD DEPINITICN ASSOCIATED WITH CCNFI,ICT XX MISCEllANEOUS TRCXJBIE 


